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Un evenement ottendu , 

mois neonmoins imprevu, 

o quelque peu perturbe 

lo pagination de ce numero . , . 

mais la naissance de I'APPLE HQS 

justifie btofl un tel remue-menage 



L'APPLE IICS 

Lisez ci-contre (page I) 
les premieres impressions 
de rtotre ami NESTOR. 

Les caracteristiques 
techniques de la bete 
se trouventpage2. 

A parti rde la page 4, 
Marcel COTTINI vous 
invite a faire connaissance 
avec le 65C816, 
microprocesseur 
equipant I'Apple HGS. 
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VOUS II 

avez dit 



COMPATIBLE" ? 



LI I APPLE IIGS est ne. Probabtement avant terme, mais qui pourrait s'en plaindre ? Cest 
toujours un APPLE //, mais ce n'est plus le 6502 (ou son successeur, le 65C02). La greffe 
— ' du cerveau est reussie et nous allons pouvolr disposer, dans quelques semaines, d une 
machine capable de rivaliser avec les plus recents des ordinateurs personnels. Ayant eu le p I a i - 
sir d'essayer Tun des premiers APPLE HGS, je n'ai pas voulu priver plus longtemps les lecteurs 
de TREMPLIN MICRO d'informations precises et objectives sur !a bete. 



Premier COIltaCt Quand on est un incondi- 
tiormel de I 'Apple ce 
qui est mon cas, cette object! vite reste bien 
entendu sujette a caution, Le preciser releve de lo 
franchise la plus elementaire. Voila qui est fait ! 
Alors ce premier contact ? Sympa. Et mime mieux 
que cela. Rien a monter. Ni vis ni ecrou... seule- 
ment des emballages a ouvrir et a vider. 

II semble impossible de commettre une erreur lors 
des connections. Vous branchez ou vous pouvez le 
faire,,. et c'est tout I Cest facile sans doc et cela 
doit letre davanfage avec la documentation qui 
accompagnera bientot la machine, Les detrom- 
peurs existent et je les at rencontres ! 



Cote esthetique, excellente impression : le OS est 
simple, net, agreable a regarder. L'ecran couleur ne 
se revele pas trop envahissanh Lensemble paraTt plus 
petit que celui de l ancien Apple... mais occupe pour- 
tant une place aussi importante sur le bureau. 

Le clavier est bien proportionne. II rappelle celui de 
I'Apple lie, mais il m a semble plus agreable. II 
serait neanmoins surprenant qu'tl fasse I'unani- 
mite, notamment pour une utilisation intensive. 

Heureusement, on apprecie d'emblee la presence de son 
pave numerique. Les gauchers seront ravis en consfotant 
qu'Apple ne les a pas oublies (la souris se connecte indif- 
feremment a droite ou d gauche), (Suite page n) 
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JOnilS B ApplG La firme de Cupertino aurait pu 
oublier ses quatre millions de 
clients et les abandonner a leur triste sort, ovec leurs 
dizaines (ou centaines) de logiciels. C'est une demar- 
che courante : on efface tout e1 on recommence. Nous 
lui saurons gre d 'avoir adopte une autre politique, 
sans doute plus couteuse, mais dont les possesseurs 
de lie et He se feliriteront. L'APPLE IIGS est biston- 
dard. C'est d'obord un Apple grace a la presence 
— 6 combien efficace ! — d'un seul et unique cir- 
cuit (ou chip !) : le MEGA II, capable d'emuler la 
machine que vous et moi connoissons bien. 
Le MEGA II salt tout faire : les fonctions de I'Apple // 
et aussi des taches qui, dans votre Apple actuel, sont 
generalement confines a diverses cartes. 

JANUS-APPLE vous offre done, sans utiliser aucun des 
slots d'extension, les 80 colonnes etendues, le contro- 
leur 3 pouces 1 , 2 mois oussi le controleur 5 pouces 
1/4, le port souris, I 'extension de memoire, la sortie 
super serie, un accelerateur 2,8 Mhz (mais on peut 
toumer a 1 Mhz), 



C0Rip(ltibilit6 On comprendra qu'il nous soit 
impossible, apres un essai de 
deux semaines, d'affirmer que toutes les anciennes 
cortes sont vraiment compatibles... toutefois, les 
exceptions devraient se reveler rares.,, et il en iro de 
meme pour les peripheriques. Personnellement, j ai 
connecte sans probleme le lecteur 5 pouces 1 /4 de 
mon He sur le second lecteur 3 pouces 1/2 de I'Apple 
HGS. Non seulement cette configuration tourne nor- 
malement, mais elle demarre sous ProDOS ou DOS 
3.3. suivont la disquette placee dans le lecteur 5 pou- 
ces 1/4, En foit, on peut affirmer sans risque d'erreur 
que, a quelques exceptions et details pres, tout ce qui 
fonctionne sur un Apple lie ou He saccommodera de 
lo compatibility de I'Apple IIGS... si les auteurs des 
programmes ont bien respecte les points d'entrees 
imposes por Apple aux developpeurs. 

Je me suis par exemple amuse a tester les disquettes 



de TREMPLIN MICRO sans rencontrer de difficultes 
msurmontables. 



JOnU5"CS Mais, tel Janus et ses deux visages, 
I'APPLE HGS est aussi une machine 
resolument tournee vers I'avenir. II suffit, pour s'en 
convoincre, de lire la fiche technique que nous 
publions plus loin (page 2). 

Si les sept slots d'extension nous laissent actuelle- 
ment sur notre faim (mais libre a nous de les occuper 
avec nos "vieilles" cartes I), ils n'en sont pas moins 
prometteurs. Que de possibilites en vue I Quant ou 
slot special "16 bits", s'il paraTt essentiellement 
reserve aux extensions de memoire, on peut raison- 
nablement penser que daucuns lui trouveront 
d'autres usages. 

LCI COUlGUI 1 C est evidemment I'un des points 
forts de la machine. En fait, la ROM 
de 128 K contient non seulement le Basic Applesoft 
(celui-la, je I aurais aime plus muscle !), mais une 
BoTte 6 outils graphiques, que I on dit inspiree du 
QuickDraw de Macintosh (moi, le MAC, je ne fe con- 
nais que de nom !). Sera-t il facile, a partir de ces 
outils essenfiels, de creer et gerer les fenetres et 
menus deroulants ? Je le souhoite et attend la docu- 
mentation pour me faire une opinion. Je crois savoir 
qu un bouquin de Nicole Breaud-Pouliquen (sur le GS] 
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Menu de configuration 

Un men j de configuration (obtenu par un CONTRCUE-POMME 
OUVERTE- ESCAPE) permel de modifier des tos de parame- 
•res. L'ulilisaleur choisit successivement diverses options con- 
cernanl le niveau sonore (deux regloges), I'affichage (cauleur 
du fond et des lettres), vitesse du 65C816 (normale ou Turbo), 
vitesse de la souris, etc. 

Lo configuration ainsi etablie est mernorisee, ce qui permet 
de la retrouver lors d'une nouvelie utilistation. N'oublions pas 
que la carte possede oussi une horloge-calendrier. 



Restrictions 

II convienl de les evoquer, Les progrommes d'amateurs figu- 
reront proboblement au nombre des routines acceptees par 
le CS (y compris sous DOS 3.3), il est evident que certains 
logiciels du commerce planteront royolement la machine, ou 
se reveleront visuellement mouwais. Ce sera notamment le 
cos pour les quelques superbes produits exigeanf lo presence 
octive de la carte Feline, tournanl en double haute resolution 
el en couleur. Bien souvenl, 31 suffira de choisir la vitesse nor- 
male (lente) pour utiliser les progrommes qui ne tolereront 
pas un frequence d'horloge de 2,8 Mbi. Souhaitons que lous 
les editeurs de logiciels se tiennent a lo disposition de leurs 
clients pour leur fournir (6 un taril interessant) d eventuelles 
nouvelles versions. 
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est en cours d'impression au PSI. II repondra certaine- 
ment a quelques -unes de mes preoccupations. Sans 
doute vous posez-vous la question de savoir si Je GS est 
compatible avec le MAC, et s'Tl en lit les disquettes ? 
Dans I'etat actuel de mes connaissances, je vous assure 
que la reponse est negative. D'ailleurs pourquoi un 
Apple IIGS irait-iJ s'acoquiner avec un MAC... incapable 
de nous offrir des images en couleur ? A moins d'etre un 
inconditionnel de MAC ($a existe aussi), on est bien 
oblige de reconnoitre que fe GSPoint de Version Soft a 
tout de meme une autre allure que le noir et blanc du 
68000. Ah ! quand viendra OPEN MAC. couleurs... et ses 
sfofs d'extension, nous en reparlerons ! Pour I'heure, 
place au GS. 

L6 5011 Je ne suis pas un dingue de la sono, mais 
j'aime bien la bonne musique et je suis 
meme un peu musicien sur les bords. H est probable que 
je ferai mes debuts de compositeur sur mon Apple HGS. 
£a promet pour I'entourage ! D'autres que moi y pensent 
deja et r lors du recent SICOB, j'ai "espionne" un groupe 
de jeunes qui se voyaient deja avec leur GS, au cceur 
d'une animation ou, d'apres ce que j'ai pu comprendre, 
I'aleatoire primerait sur la logique. 

LeS lOgiCielS Pos nombreux si I 'on s'en tient au 
seul GS. Personnellement, je n'ai 
teste que GSPoint, mais GSWrite (egalement de Ver- 
sion Soft) sera Jivre avec la machine,., et sa finition ne 
devrait done point tarder. D'autres developpeurs, en 
France et a I'etranger, travaiflent actuellement sur des 
produits superbes, destines au dernier-ne de chez Apple. 
Nous en parlerons au fur et a mesure de leur apparition 
sur le morche... dans la mesure ou nous les estimerons 
interessants I ORCA/M (voir notre dernier numero) est 
deja prevu pour travailler sur I Apple //GS, mais il est 
destine a des programmers avertis capobles de com- 
prendre une documentation en anglais. II convient de 
noter que la plupart des grands classiques fonctionne- 
ront en emulation,., a quelques rores exceptions pres 
(gageons que les fabricants auront a cceur de corriger les 
eventuelles imperfections). 

Un conseil . exigez des maintenant une disquette 3 pou- 
ces 1 17 de tous les logiciels que vous deciderez de vous 
offrir, et cela des que leur prix depasse 50Q F. Cest une 
assurance pour l avenir. 

PeripherjqueS On I'a vu, le GS accepte les 
nouveaux lecteurs 3 pouces 
1/2 t mais reeonnatt Jes anciens, Vous n'etes done 
pas oblige, si vous poss^dez deja Minidisk, de vous 
offrir une configuration complete. Je ne vous 
apprendrai rien en precisant que les 800 K sont 
chatnobles... y compris avec on 5 pouces 1/4 (voir 
plus haut). Vous pouvez aussi glisser la carte con- 
troleur de votre lie dans le GS... et y connecter 
vos lecteurs actuels. Ce ne sera pos pour autant le 
Salon du Bricolage ! Et puis, on oime $a.., chez les 
applemaniaques, alors !.., 
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Imprimailte Voire IMAGEWRITER (I ou llj fera 
I'affaire. avec une preference 
pour lo II... et ses caracteres souris. Par la suite, 
vous eprouverez peut etre I'envie de vous connec- 
ter — en possant par quelque reseau... ou di recre- 
ment si vous avez les moyens de vous Toffrir vous- 
m£me — a une Laser Writer, Cela supposera que 
vous disposerez alors d'un logiciel comme PageMa- 
ker {dont on distribue actuellement la version 1.2 
francoise.,, mais pour MAC), Pourquoi pas ? II est 
bien permis de rever, non ? 

Moi, je ne vous cacherai pas que, lorsqu un fabri- 
cant me parle de son logiciel, je lui pose illico la 
question de confiance : 
— Et il fonctionne aussi sur le GS ? 

I autre compatibility vous me VO yez 

venir ? Il va etre 
question d'IBM. Mois d'abord, que signifie la com- 
patibility avec IBM ? Que Ton pourra ufifiser, sur 
Apple IIGS des logiciels prevus pour I IBM PC ? En 
connaissez-vous beaucoup qui n ont pas leur equi- 
valent sur Apple ? Ou qui ne I'auront pas, au cours 
des prochains mois sur APPLE HGS ? D'ailleurs, le 
vrai compatible nexiste pas. Cest un leurre. 
Pourrez-vous lire, sur Apple //GS, des fichiers 
ecrits sur un IBM PC ? Cest deja possible... tant il 
est vrai que tout est realisable, quand ii ne s'agit 
que de transmettre ou recevoir des donnees. 
Evidemment, pour executer un programme, e'est 
une autre histoire ! 

On sait pourtont que, par cartes "coprocesseurs" 
inferposees, I'Apple IIGS deviendra compatible 
avec CP/ M (c est !a moindre des politesses) et avec 
MS /DOS (d'ou sort-il, celui-la ?). 
Moi, stoVque, fidele a mon Apple fie, mois tout dis- 
pose & le mettre dans un coin et a le remplacer par 
le GS, j'attends ma DOC, mon fangage machine, 
mes adresses (et notamment celles du moniteur... 
car j'en ai semble-t-il egare quelques unes)... et 
une sceur de la belle bete que je viens de toucher... 
mais que je dois heMas restituer au service de 
Presse d'Apple ! nestor 

III 




Une revolution 
dans le domaine 
de la saisie 
des donnees : 

la reconnaissance 
de I'ecriture 



PERSONAL WRITER 



UE sera Nnformatique de 1990 ? Nous en avons aujourdhui un avant-gout, sur MACIN- 
TOSH, avec PERSONAL WRITER — un nom anglais pour designer un logiciel bien fron- 
gais, mais que ses promoteurs esperent diffuser dans le monde entier. En fait, PERSO- 
NAL WRITER est le produit numero un d'une societe creee en 1985 : ANATEX S.A. Une dizaine 
de personnes — dont sept ingenieurs aussi jeunes qu'enthousiastes — y travailtent sous la 
direction du fondateur : Xavier Maury. Mais revenons a PERSONAL WRITER ! 



Objet Dechiffrer les caracteres manuscrits et 
les transformer directement en texte 
dactylographie, sons nulle intervention du clavier. 

L€ SySt6iH£ " se compose d une tablette 6 
digitaliser, d un stylo 3lectronl- 
que et d'un logiciel de reconnaissance des caracte- 
res. Actuellement, PERSONAL WRITER n'est utilisa- 
ble que sur Macintosh, mais il sera progressive- 
ment odapte d d'autres machines (IBM PC. et n'en 
doutons pas... I' Apple IIGS). 

ApprentiSSfige Pendant la phase dite 
d'apprentissage, la machine 
se contente de reconnoitre I'ecriture de I'usager, 
mais les variations d'eaMture continueront ensuite 
d'etre enregistrees lors de chaque utilisation. Plus 
on se sert de PERSONAL WRITER et plus il devient 
intelligent et performant ! 



Ecriture naturelle Avec c , e ^eme on ecrit 

normalement, sur la ta- 
blette, sans contrainte particuliere. On peut rayer un 
mot, en a [outer un autre, intercaler une phrase ou 
changer la faille d une lettre. L'ecran restitue fidele- 
ment toutes les modifications apportees au texte. 

EtlGSfnUteS^ Mais qui, grace a un diction- 
naire integre, PERSONAL WRI- 
TER est egalement capable de detecter et done de 
corriger les fautes d'orthographe (on prevoit d'ail- 
leurs des dictionnaires specialises). Evldemment, 
pour linstant du mains, il n'est question que de cor- 
riger les mots... et nan la syntaxe, mais tous les 
espoirs sont permis ! 

PrlX Commercialisation prevue au debut de 
l annee prochaine. Le prix public se situera 
entre 14000 et 18000 F (tablette a digitaliser, stylo 
electronique, logiciel et dictionnaire de 200000 mots), 

Clerrio.it RENARD. 
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L'APPLE // GS 

votre ordinateur personnel de demain ? 
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OUS I'attendions tous. On en avait beaucoup parle, ici et la, 
mais surtout dans les revues d'informatique. Jusqu'au 15 sep- 
tembre — un peu plus tot pour quelques rores privilegtes — on 
ignorait quel serail exactement son norm de bapteme, II en va 
ainsi pour la plupart des nouveaux-nes. 

Ce sera done un GS : G pour le graphisme et S pour un son qui a laisse babas 
bien des journalistes (les Amiga et autres Atari sont de nouveou a la traine). 
Un vrai synthetiseur 16 voix (ou instruments), comme bur les appareils reser- 
ves aux professionnels. Sans doute en deduisez-vous que, prochoinement, on 
utilisera le GS pour commander des animations avec paroles et musique ? 
Vous avez surement raison, Reproduire la voix humaine ne pose pas de pro- 
bleme particulier a I'Apple tlGS, On va bien s'amuser ! 

Je ne vous apprendrai rien en ajoutant que le GS doit beaucoup — et notam- 
ment sa rapidite d execution — au 65C816, un microprocesseur 16 bits dont 
vous decouvrirez rapidement les nombreuses et immenses ressources. 

J'avoue avoir ete conquis, et d'emblee, par la demonstration que j'ai regard ee 
et ecoufee. Evidemment, le graphisme ne presente pas encore la qualite photo 
(telle qu'on la conceit dans une revue comme CHASSEUR D'IMAGES), mais il 
s'en ropproche un peu plus, notamment quand il utilise la palette de couleurs 
avec ses 4096 nuances. 

Mais que deviennent votre vieil Appte He et sa montagne de logiciels ? 
Rassurez-vous, le GS saura executer la plupart des programmes qui lui 
etaient destines, mais environ trois fois plus vite. Il est probable que vos routi- 
nes personnelles figureront au nombre des merveilles reellement compati- 
bles. Mais il y a mieux : dans quelques mois (sans doute au debut de I'annee 
1987), vous aurez fa possibilite, pour environ 5000 F, de remplacer votre carte 
actuelle par la nouvelle. Quel interet ? Repondre octuellement a cette ques- 
tion se revelerait fort presomptueux ; attendons d'avoir realise un tel echange 
pour en parler serieusement, mais felicitons tout de meme Apple d'avoir 
pense aux 4 millions d'utilisateurs fideles a la Pomme. 

Au fait, il paraTt que les premiers Apple // GS seront disponibles des la fin de 
ce mois de novembre... 



BONNE PROGRAMMATION ! 
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Le panneau arriero do I'Apple IIGS 




CAR ACTER1ST1 QUES TECHNIQUES 

L Apple IIGS comprend 

• Un microprocesseur 16 bits 65C816, emulant le 

65C02 ; 

Des processeurs specialises : 

— MEGA II pour ('emulation Apple II ; 

— VGC pour les nouveaux modes graphiques ; 

— IWAA pour les entrees-sorties disques 5"l/4 
et 3" 1/2 ; 

— ENSONIQ, 32 oscillateurs pour le son. 

• 256K de memoire vive (RAM) extensible a 8 
Megaoctets ; 

• 128K de memoire morte (ROM) contenant les 
outtls QuickDraw II et le BASIC Applesoft ; 

• Un clavier detachable AZERTY avec bloc numerique ; 

• Une souris ; 

• Une horloge temps reel integree ; 

• 8 ports integres : 

— Un connecteur son pour haut-parleur ou cas- 
que d'ecoute ; 

— 2 ports serie RS422C (compatibles RS232) 
dont I'un peut servir de port Apple Talk ; 

— Un port pour manettes de jeu ou manche a 
balai (joystick) ; 

— Un port lecteur de disquette 5"1 /4 et 3"1 /2 ; 

— Un port video couleur analogique RVB ; 

— Un connecteur video pour moniteur mono- 
chrome ; 

— Un connecteur ADB (Apple Desktop Bus} 
pour clavier et souris. 

• 8 connecteurs internes d'extension, dont un 
connecteur pour carte d'extension memoire 
vive et memoire morte ; 

• Des graphiques super-haute resolution 640 X 
200 en 4 couleurs et 320 X 200 en 16 couleurs 
parmi 4096 couleurs possibles ; 

• Sons 16 voix permettant de restituer la musique 
et la voix humaine. 

L'Apple IIG5 est compatible avec la gamme Apple 
II, e'est-a-dire avec la presque totalite des logi- 
ciels, penpheriques et cartes d'extension Apple II. 
Par ad jonct ion de cartes coprocesseurs, il sera 
egalement compatible CP/M et MS/DOS. 



L Apple IIGS sera commercialise ou prix de 15900 fn. HT, Hs'ogit de 
fa version SI2K. moniteur couleur, ledeur 8QQK 3" 1/2, avec le hgi- 
ciel de creation graph! que GS Paint* et fe iogiciel de traitement de 
texte GS Write *i La meme configuration, mais avec vn moniteur noir 
et bhnc sera vendue au pr'tx de 12900 Frs. HT. 
Notre "cher" Apple tlX n'est pas donne I ■ 



1 GS Paint rt GS Write font des marques d«pa*4*t Vmrtlon Soft. 
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L'AVENIR 

est a vous... 
avec I'APPLE II 
et son 65C816 



Le Microprocesseur... 

Ses instructions 

Ses registres 

Ses codes operations 

Ses adressages sommaires 



DANS CE 
NUMERO 



DANS NOS 
PROCHAINS 
NUMEROS 
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1LE MICROPROCESSEUR 
W65C816PI-2 



AVANT-PR OPOS 

Le microprocesseur 6502, comme le Z80, est un rescape du debut de linformatique i ndivf- 
duelle ayant equipe d'origine les premiers Apple //. L evolution de la technologie aidant, un 
probleme de faille s'est pose aux chercheurs de Cupertino : comment faire evoluer la serie 
des Apple // sans perdre, dans I'immediat, I'acces a I'imposante bibliotheque de logiciels ? 
Le premier essai tente (et loupe) a ete la mise en place du 65C02 dans I'Apple lie et 
I' Apple lfe+, Ce microprocesseur, bien que plus complet que son predecesseur, ne fut pas 
a la hauteur de la concurrence du marche actuel (processeur du type 8086, 8088 ou 68000). 



Le W65C816PI-2 de Western Design Center Inc est 
un successeur direct du 65C02, 1'architecture 
interne des registres etant realisee sur 16 bits de 
large avec un bus de donnees de 8 bits. II peut 
adresser 16 Mo, possede un registre supplemen- 
tal {Direct Register - 0) et porte a 16 bits toys les 
registres existants. Neanmoins, son bus de don- 
nees reste un 8 bits, ce qui le limite a travail ler sur 
des mots d'une longueur de 8 bits. Cette situation 
de faux 16 bits n est nullement un handicap, et ne 
le penalise absolument pas par rapport a d'autres 
«chips». II possede en eftet le plus faible temps 
d'acces memoire des microprocesseurs grand 
public (un cycle horloge). La version W65C816PI-8 
outorise un fonctionnement de I'horloge hull fois 
plus rapide que celle de I'Apple II, cest-6-dire 
8 Mhz. C est un concurrent potentiel du processeur 
8088, cceur des IBM PC et compatibles IBM PC. 

II y a aussi le G5CS02... 

Le 65C816 n'est d'ailleurs pos le seul de sa famille, 
puisqu'il existe un autre microprocesseur posse- 
dant les memes instructions machine et de surcroit 
compatible broche a broche (pin to pin) avec le 
6502, e'est le 65C802. Ces deux processeurs font 
partie de la famille des composonts hybrides, 
capables de travailler sur 8 ou 16 bits en passant 
d un mode a un autre. 

Neuf registres de base 

Le microprocesseur 65C802 peut etre install© direc- 
tement sur un Apple He sans la moindre modifica- 
tion. Par ailieurs, il pourra etre programme puis- 
que certains assembleurs connaissent deja son Ian- 



gage machine (S-C Macro Assembler), Dans les 
versions du 6502, les registres sont au nombre de 
six : les registres d'index X et Y, l accumulateur, le 
registre d'etat, le compteur ordinal et le registre 
pointeur de pile. Leur toille est de 8 bits de large, 
sauf pour le compteur ordinal, dont la taille est de 
16 bits (adresses $0000 a $FFFF). 

La structure des 65C816 et 65C802 est dotee de 9 
registres de base, dont six sont communs aux 
65C816, 65C802 et 6502. Les nouveaux arrivants 
sont : le registre d'adressage direct (D) et deux 
registres annexes qui se composent d'une port du 
registre page de donnees (DBR) et d'autre port du 
registre page programme (PBR). L innovation prin- 
cipal reside dans le mode d'adressage pouvant 
etre bascule soit en mode 8 bits, soit en mode 
16 bits. Les registres de ce nouveau produit sont : 

- le registre page de donnees. Data Bank Register 
-DBR 

— le registre d'index X. Index Register X - X 

— le registre d'index Y. Index Register Y • Y 

— le registre pointeur de pile. Stack Pointer ■ S 

— le registre accumulates. Accumulator ■ C 

— le registre page progromme Program Bank 
Register -PBR 

— le compteur ordinal. Program Counter - PC 

— le registre direct. Direct Register - D 

— le registre d'etat. Status Register - P 

La sortie sur le marche de la serie des Apple // 
suscito, pormi un grand nombre de ses adeptes, un 
enthousiasme tel que la courbe des ventes s'en 
ressentit. Mais, la limitation de lo capacite me- 
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moire el la lenteur relative de la vitesse d'execu- 
tion des instructions (processeurs 6502 et 65C02) 
furent tres vite sujet a caution. II faut por ailleurs 
rappeler que le marche de I'informatique subit 
periodiquement des bouleversements provoques 
en grande portie par la sortie de nouveaux pro- 
ducts. C'est ainsi qu'Apple Computer a fait la dou- 
loureuse experience de la montee en fleehe du 
materiel IBM (PC, AT et XT). L'annee 1986. temoin 
de la purge de ban nambre de modeles de micro 
ordinateurs, reste tout de meme une bonne annee 
pour la micro-informatique grand public. Apple 
Computer a releve le defi avec son nouveau 
modele (Apple ll-GS) equipe d'un microproces- 
seur hybride capable de travailler sur 8 ou 16 bits 
en passant respectivement du mode emulation ou 
mode native. Le processeur est un 16 bits emulable 
avec le 6502 par lintermediaire d un registre d etat 
(bit E associe aux bits M et X). 
Un certain nombre de revues specialisees dans le 
domaine de lo micro-informatique grand public, en 
particulier Tremplin Micro, sont en droit de se 
poser des questions sur I'avenir immediat des 
Apple // (processeurs 6502 et 65C02). Que tout ce 
monde se rassure, la sortie de I'Apple ll-GS 
n'empiete en rien sur le marche existant de 
I'Appfe //. L'Apple ll-GS s'adresse a un nouveau 
public, desirant evoluer dans le domaine de la pro- 
grammation tout en gardant la possibilite d'usage 
de la bibliotheque des logiciels du 6502. En quel- 
que sorte un certain retour oux sources : compati- 
bilite gorantie. avec en prime la possibilite d'un 
nouveau mode de programmation (16 bits). 

L'Apple H-GS 

L'Apple ll-GS, dernier ne de la lignee des Apple //, 
est dote d'un microprocesseur 16 bits (65C816) 
dont le modele retenu possede un temps d'horloge 
de 2Mh2. Ce processeur, cceur de la «maehine», 
est capable d odresser 16 Mega-octets (16,384.000 



octets) de memoire vive (RAM), Por ailleurs, 4 
Mega-octets seront directement accessibles dans 
la carrosserie du modele fabrique en serie. L'origi- 
nalite de cette operation commerciole reside dans 
le fait que ce processeur peut tout aussi bien fonc- 
tionner en 16 bits qu'en 8 bits. Dans ce dernier cos, 
on dit qu'il emule avec le 6502, pouvant utiliser 
toute la bibliotheque des logiciels existants. Cer- 
taines similitudes frappantes existent par rapport 
au Macintosh. La configuration de base se divise en 
trois maillons : unite centrale, clavier detachable 
et ecran de visualisation. 

Haute resolution extra 

Un soin tres particulier a £te apporte a la haute 
resolution graphique. Une palette de 16 couleurs 
est disponible pour 1'utilisoteur, permettant un affi- 
chage de 200 x 320 points (ou pixels) sur I'ecran, Le 
systeme d exploitation ProDOS, dernier ne des 
programmes systeme d'Apple Computer, a ete mis 
a jour pour s'adapter aux exigences du 65C816 (ou 
65C802). II integre un «Finder» style Macintosh et 
une horloge. Certaines routines ont ete reecrites. 
Un certain nombre de dispositions ont ete prises 
pour donner a ce nouveau-ne un new look capable 
d'accrocher les «branches» potentiels. Toute une 
panoplie d'extensions sont deja disponibles, on 
pourrait citer une carte sonore* avec synthetiseur 
6 16 voies, la possibilite de raccordement au 
reseau AppleTalk, la compatibility des lecteurs de 
disquettes 3 pouces et demi (800 Ko) et des lec- 
teurs de 5 pouces 1/4 (140 Ko). Par ailleurs, tout 
est prevu pour permettre 6 votre machine preferee 
de dialoguer avec un IBM PC en lui raccordant une 
carte interface munie du fameux processeur 8088 
C'est ainsi que la riche bibliotheque de logiciels 
MS-DOS sera a la portee de I'heureux detenteur du 
nouvel Apple. Une ombre pourtant au tableau de 
ce magnif ique palmores : leprix. 



Cet orticle a ete redige et compose avant la naissance officielle de I Apple IIGS et aucune carte 
d'extension n est necessaire pour beneficier d'un remarquable synthetiseur 



MICRQC1RCUITS CMOS 8/16 BITS - Microprocesseur familial 



Ce nouveau type de microprocesseur fort partie 
d une famille de composants de la serie 8 
bits/ 16 bits CMOS, Le numero de reference com- 
plet est W65C816PI-2. C'est un 16 bits, compor- 
tont un registre supplemental par rapport au 
6502. Le registre de donnees est un 8 bits ne 
troitant que des mots de 8 bits de large. Cette 
restriction est imposee pour permettre I'emu lo- 
tion avec la serie des processeurs 6502. 
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A la mise sous tension de la configuration, mode 
native, le bit E du registre d'etat a la valeur zero. 
En mode emulation, le bit E sera positionne a la 
valeur 1. Differents modes d'adressage sont possi- 
bles suivant la valeur du bit E. Si E = 1, la configu- 
ration se trouve en mode emulation, elle est alors 
compatible avec le 6502 (8 bits). Si E = 0, le mode 
est native avec la possibilite de traiter des regis- 
tres ou lo memoire sur 16 bits. 



COMPATIBILITY EN THE LE 65C802 ET LE 6502 



Le microprocesseur 65C8G2 (16 bits processor) est 
un produil similaire au 65C816, avec une compati- 
bility broche par broche totale (pin to pin) avec le 
6502 de la serie des Apple II. II est done permis de 
remplacer le 6502 par un 65C802, aux performan- 
ces plus adoptees a notre temps, 
Ce type de produit a I'opportunite de se substituer 
a un autre processeur sans modifier lo carte mere, 
ll autorise des so mise en ploce la possibility d'utili- 
ser deux modes de programmation . 

— en emulation, e'est toute la bibliotheque de 
I' Apple //(65Q2) qui sera offerte d I'utilisoteur ; 

— en mode native, des instructions supplemen- 
taires et plus puissantes seront disponibles. 
L'Qvontoge reside en la mise en place d'un seul 
composant mettant la puissance de l adres- 
sage 16 bits 6 la portee du programmeur 
amateur. 

En mode native, e'est 6 dire a la mise sous tension 
de la configuration, I'adressage 16 bits sera dispo- 
nible, tandis qu'en mode emulation la configura- 



tion sera compatible avec le bon vieux 6502 (8 

bits). Le microprocesseur 65C802 est done un 

excellent produit de remplocement du 6502. 

Le microprocesseur 65C816 ne peut pas remplacer 

directement le 6502, le brochage n'etant pas le 

meme. 

L organisation interne des microprocesseurs 
65C802 et 65C816 se divise en deux grandes 
parties : 

— la partie reservee aux registres ; 

— la portie reservee pour le controle des instruc- 
tions (codes). 

Architectures du processeur : 

Architecture interne. Les signaux contribuant au 
transfer! et a I'execution des instructions relatives 
au processeur, via la section de controle des ins- 
tructions, sont du type 16 bits pour les processeurs 
65C802et65C8l6. 

Architecture externe, Le bus de donnees (data bus] 
a I'encontre de la structure des registres internes 
(16 bits) est de 8 bits. 



C0MPARAIS0N DES MICROPROCESSEURS 65C802 ET 65C816 



FONCTION 


MODE EMULATION E - 1 


MODE NATIVE E — 






Pointeur de pile (S) 
Direct indexe 


8 bits Page T 
Interne a une page 


16 bits 

Depassement limite page 


memoire 


Rggistre d'etat (P} 

— Bit A (X) 


Toujours a 1. Hormis si la pile 
est reactualisee suite 6 une 
interruption Hardware. 


X = 

Index sur 8 ou 16 bits. 






Bit 5 (M) 


Toujours a 1 . 


M = 

Accumuloleur sur 8 ou 16 


bits. 




Bronchement par depossement de 
la limite d une page memoire. 


4 cycles 


3 cycles 






Situation des vecteurs d'interruption 








ABORT 

BRK 

COP 

IRQ 

NMI 

RESel 


S0QFFF8, SQ0FFF9 
$00FFFE,$00FFFF 
$00FFF4/$G0FFF5 
SO0FFFE/5Q0FFFF 
SQ0FFFA SOOFFFB 
fcaOFFFC, SGOFFFD 


S00FFE8. 50OFFE9 
$00FFE6/$00FFE7 
$00FFE4/$00FFE5 
$00FFEE S00FFEF 
$Q0FFEA/$00FFE8 
$00 FFFC S0OFFFD (1-E) 






Program Bank (PB) pendant une interruption — retour par RTI. 

Nan empile depile 


Empile et depile 






Tension nulle sur lo broche RDY du 


processeur - Write 








— 65C8Q2 

— 65C8I6 


Ignore avant Read 
Processeur stop 


Processeur stop 






Sauvegarde (Write) pendant Read,' Modify/Write 










Puree 2 cycles 


Duree 1 ou 2 cycles sui 
registre d'etat. 


/ant li 


s bit M du 
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DESCRIPTION DU MICROPROCESSEUR 65C816 



CMOS designe une fabrication du produit en 
Metal Oxyde Semi conducteur pour MOS, et ou 
le C designe que ce circuit est complemen- 
taire. Les Jonctions semi-conducteurs du 
type P (Positil) et N (Negatif) sont utilisees de 
maniere complementaire. Ce precede de fabri- 
cation reduit considerablement la dissipation 
d'energie (chaleur) en outorisont une alimen- 
tation du circuit sous unefaible intensite. 

— emulation, d'ou totale compatibility des pro- 
grammes ecrits pour le processeur 6502 (8 

bits). 

— 16 bits pour les registres Accumulates, poin- 
teur de pile et d'index (X et Y)* 

— un registre 16 bits supplemental par rapport 
au 6502. Registre Direct (Direct Register) pour 
I'adressage de la page zero (16 bits). Si ie 
registre D est egal a G, on se trouve en pre- 
sence de I'adressage page zero du 6502 (8 
bits). 

— deux registres annexes 8 bits, supplementai- 
res par rapport au 6502. Le registre page de 
donnees et le registre page programme. 

— 24 modes d'adressoge (le 6502 n'en possedait 
que 13). 

— Instruction WAl attend une interruption, tan- 



dis que Instruction STP innibe I'horioge du 
processeur. Cette commodite permet de 
reduire la consommation en energie et dimi- 
nue les interruptions latentes. 

un total de 91 instructions de base autorise 255 
codes instructions combines, suivant le mode 
d'adressoge utilise. 

une instruction specifique (COP) pour l utilisa 
tion d un coprocesseur. Elie offecte I'adressage 
de la pile et force 6 1 ie bit I et a le bit D du 
registre d'etat. 

deplacement d'une page source (block bank) 
vers une page de destination (bank). Instruc- 
tion tres puissante pour le deplacement de 
donnees d une page memoire source vers une 
page memoire destination. 

permet d'effectuer des operations sur 16 bits, 
le bus d'adresses est organise pour adresser 
16 Mo de memoire vive. 

selection en mode 8 bits pour emuler avec le 
processeur 6502. 

validation des broches de sortie du circuit de 
controle d'etat du processeur (Status Control) : 
Valid Program Address (VPA) et Valid Data 
Address (VDA). 



SIGNIFICATION DU NUMERO DE REFERENCE 



W65C816PI-2 



W type standard 

WC usage general 

65C816 identification du produit 



C — 
816 — 



sene 
CMOS 
8/16 bits 



enrobage du processeur 

P = plastique 

C = ceramique 

D = procede d'enrobage 

E = reserve a I'automobile 



temperature normaie 

sans indice = 00 a 70 degres 
I 

M 



= 40/ d 85 degres 
= 55 a 125 degres 



■2 horloge du processeur 



-4 
■6 



= 2 Mhz 

- 4 Mhz 

= 6 Mhz 

= 8 Mhz 
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COMPATIBILITY DES MICROPROCESSEURS DE LA SERIE 65C... 



FONCTION 


65C816 • EMULATION 


65C02 


6502 


Mode decimal 

— Apres interruption 

— Drapeaux N etl 

— ADC et SBC 


Bits 0-D 
Valides 

Pas de cycle en + 


Bits 0-D 
Valides 
+ 1 cycle 


Inutilises 
Indetermines 
Pas de cycle en + 


Read /Modify /Write 

— Adressage absolu indexe. 
Pos de chevauchement de 
page memoire 

- Write 

\Jqtw Cm i i lf"ir*i£» H & in momr^ira 

v vi f oui i "Jyy Uc 'U iTitfiTiuii v 


7 cycles 

Dure 2 cycles 
uure j cycles 


6 cycles 
Dure 1 cycle 

UU' fcf £ CyCICs 


7 cycles 
Dure 2 cycles 

INOil □IbpuillUlc: 


Saut Inconditionnel (JMP 
Indirect) 

— Duree en Cycles 

— Saut a I'adresse operante - 
forme XXFF 


5 cycles 
Correcte 


6 cycles 
Correcte 


5 cycles 
Non valide 


Bronchement ou possage d'une 
limite de la page memoire 


lecture d'un byte 


Lit un byte 


Read non valide 


Tension nulle sur la broche 
RDY durant lecriture -Write. 

— Processeur 65C802 

— Processeur 65C8 16 


Ignore avant Read 
Processeur stop 


Stop 65C802 


Idem au 65C816 


Ecriture (Write) durant Reset 


Non 


Oui 


Non 


Declaration de codes machine 
inexistants 


Inoperant 


Inoperant 


Indetermine 


Signal valide sur la broche RDY 
du microprocesseur 


Entree/sortie 


Entree 


Entree 



Pourrez-vous 
programmer 

I'APPLE IIGS? 



Certains de nos correspondents 
s'inqvietent et paraissent redouter 
laurs premiers contacts avec la bete... 



Vous retrouverez, sur I'APPLE HGS, le bon vieux Basic 
Applesoft que vous connoissez deja. Vous le retrouverez 
avec ses inconvenients (nombre d'instructions limite, 
absence de PRINT USING, etc.) et ses avantages : une cer- 
taine rapidite et une grande tolerance lors de la saisie. Par 
consequent, aucun probleme de ce cote, sinon que vos pro- 
grammes tourneront au moins deux fois plus vite. 

Vous aurez par contre avantage a pratiquer le langage 
machine. Le 65C816, microprocesseur puissant et complet 
vous autorisera a creer des routines a la fois courtes et 
u Itra-perf orman tes. Pensez aussi au Langage C... dont on 
dit beaucoup de bien. nestor. 
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2LES INSTRUCTIONS DU 
MICROPROCESSEUR 65C816 



GENERALITES 

Le microprocesseur 65C816 possede la propriete de pouvoir trailer des donnees suivant 
deux modes d'adressage differents : le mode emulation qui traite des registres de 8 bits et 
le mode native qui traite des registres de 16 bits. Le passage d'un mode a I'autre se fait en 
positionnant la retenue (Carry Flag) et en transmettant au systeme ('instruction XCE 
(Exchange Carry an Emulation Bits), La commande XCE positionne le drapeau en E (bit 
demulation). Si E est a un, le microprocesseur est en mode emulation et adresse comme un 
6502 (8 bits), Toute la bibliotheque des logiciels existants reste alors disponible. Si E est a 
zero, le mode native est actif. Dans ce mode, le microprocesseur utilise certains de ses 
registres sous un format 16 bits. En mode native, les bits 4 (Index Register Select) et 5 
(Memory Select) du registre d'etat changent de signification. Si le bit 4 est positionne a zero, 
alors les registres d'index sont considered comme des registres de 16 bits de large. Si le bit 5 
est a zero, I'acces a la memoire se fait sur 16 bits. 

Le microprocesseur 65C816 utilise 255 codes instructions, soil 91 de plus que le 65C02, Ces 
nouvelles instructions sont pour la plupart des ameliorations apportees a I'adressage du 
6502, soit pour l utilisation de la fonction 16 bits, soit pour exploiter les nouveaux modes 
d'adressage. Par ailleurs, de nouvelfes instructions de transfer! entre les registres ont fait 
leur apparition, sans oubtier ^innovation des instructions de deplacement de bloc memoire, 
ainsi que Instruction COP, pour une utilisation d'un coprocesseur. 



ADC Addition avec retenue — Add 
Memory to Accumulator with Carry. 
On ajoute a I'accumulateur le contenu de lo case 
memoire plus le bit de retenue. Cette operation 
s'effectue en mode binaire ou decimal, Agit sur les 
bits N, V, Z et C du registre d'etat. 

AND ET logique — AND. ET logique (AND) 
entre I'accumulateur et la memoire. 
On effectue une operation bit a bit avec I'accumu- 
lateur et la memoire. Permet de forcer des bits a 
zero. Agit sur les bits N et Z du registre d'etat. 

Decalage d'un bit vers la gauche — 
Shift One Bit Left (Memory or Accumu- 
lator). On decale a gauche d'un bit, operation 
effectuee sur I'accumulateur ou la memoire. Un 
zero entre 6 droite tandis que le bit sortant a gau- 
che va dans la retenue. Agit sur les bits N, Z et C du 
registre d'etat. Pour tous les modes d'adressage 
utilisant les instructions relatives 6 Read/ 
Modify/ Write, excepte I'adressage accumuloteur, 
les regies suivantes sont a appliquer : 

— Ajouter 1 cycles si E = \ ou E = et M = 1 (8 bits mode) ; 



— Ajouter 3 cycles si E = et M = (16 bits 
mode). 

Branchement si pas de retenue — 
Branch on Carry Clear (C - 0), Si le bit 
C = on saute a I'odresse indiquee, sinon, on con- 
tinue en sequence. Aucune action sur le registre 
d'etat. 

— Ajouter 1 cycle si le branchement est realise. 

— En mode emulation (E = 1), ajouter 1 cycle si le 
branchement est realise et si une page memoire 
est fronchie. 

Branchement si la retenue est a 1 — 
Branch on Carry Set (C = 1). Si le bit 
C = 1 on saute a I 'adresse indiquee, sinon, on con- 
tinue en sequence. Aucune action sur le registre 
d'etat. 

— Ajouter 1 cycle si le branchement est realise. 

— En mode emulation (E = 1), ajouter 1 cycle si le 
branchement est reolise et si une page memoire 
est franchie. (suae page w) 
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Bronchement si zero — Branch if 
Equal (Z = 1). Si le bit Z = 1 on saute 
6 I'adresse indiquee. sinon, on continue en 
sequence (bit Z = 1 si le dernier resultat est nul , ou 
si la derniere comparaison a donne I'egalite). 
Aucune action sur le registre d'etat, 

— Ajouter 1 cycle si le bronchement est realise. 

— En mode emulation (E = I J, ajouter 1 cycle si le 
branchement est realise et si une page memoire 
est franchie. 

BIX Test de bits — Bit Test. On effectue le 
ET virtuel entre I'accumuloteur et la 
memoire specifiee. Le resultat n'est pas remis dans 
I'accumulateur (AL ou A) qui reste inchange. L'indi- 
cateur Z (Z flag) est positionne en consequence. 
Agit sur les bits N, V et Z du registre d etot. L'ins- 
truction BIT n'affecte pas les bits N et V en ad res - 
sage immediat. Dans les autres modes d'adres- 
sage, N et V (flags) occupent respectivement les 
bits 7 et 6 ou 1 5 et 1 4 de la memoire adressee, sui- 
vont le mode actuel (byte — 8 bits ou expression — 
16 bits). 

BMI Branchement si negatif — Branch if 
Result Minus (N = 1). Si le bit N = 1 
on saute d I'adresse indiquee, sinon. on continue 
en sequence. Le resultat est negatif. Aucune action 
sur le registre d'etat. 

— Ajouter 1 cycle si le branchement est realise. 

— En mode emulation {E = 1 ) F ajouter 1 cycle si le 
branchement est realise et si une page memoire 
est franchie. 

Branchement si non egal — Branch if 
Not Equal (Z = 0). Si le bit Z = on 
saute a I'adresse indiquee, sinon, on continue en 
sequence, Le bit Z = (resultat nul) si le dernier 
resultat est different de 0, ou si la derniere compa- 
raison n r a pas donne I'egalite. Aucune action sur le 
registre d'etat. 

— Ajouter 1 cycle si le branchement est realise, 

— En mode emulation (E = 1 ), ajouter 1 cycle si le 
branchement est realise et si une page memoire 
est franchie. 

Branchement si positif ou nul — 
Branch if Result Plus ( N = 0). Si le bit 
N = on saute a I'adresse indiquee, sinon, on con- 
tinue en sequence. N = si le dernier resultat est 
superieur ou egal 6 0. Aucune action sur le registre 
d'etat. 

— Ajouter 1 cycle si le branchement est realist. 

— En mode emulation (E = 1 ), ajouter 1 cycle si le 
branchement est realise et si une page memoire 
est franchie. 



BRA Branchement relotif effectue sur 8 bits 
— Branch Always. On saute d 
I'adresse indiquee sans condition. Aucune action 
sur le registre d'etat. 

— Ajouter 1 cycle si le branchement est realise. 

— En mode emulation (E = 1), ajouter 1 cycle si le 
branchement est realise et si une page memoire 
est franchie. 

Interruption logicielle — Force Break. 

Met le bit I d 1 et D a 0, puis simule 
une interruption. On empile les valeurs du comp- 
teur ordinal et du registre d'etat puis on saute a 
I'adresse contenue dans le vecteur d'interruption. 
Force d le bit D et d 1 le bit I du registre d'etat. 
Deux octets sont occupes par BRK. Sept cycles sont 
necessaires en mode 8 bits et huit cycles en mode 
16 bits. 

Branchement relatif long (16 bits) — 
Branch Always Long. Effectue la 
recherche de I'adresse memoire lors d'un branche- 
ment long effectue sur 16 bits ($0000-$FFFF). 
Aucune action sur le registre d'etat. 

BVC Branchement si non depassement de 
capacite — Branch on Overflow Clear 
(V = 0). Si le bit V = on saute 6 I'adresse indi- 
quee, sinon, on continue en sequence. Aucune 
action sur le registre d'etat. 

— Ajouter 1 cycle si le branchement est realise. 

— En mode emulation (E = 1), ajouter 1 cycle si le 
branchement est realise et si une page memoire 
est franchie. 

BVS Bronchement si depassement de 
capacite — Branch on Overflow Set 
(V = 1). Si le bit V = 1 on saute d I'adresse indi- 
quee, sinon, on continue en sequence. Aucune 
action sur le registre d'etat. 

— Ajouter 1 cycle si le branchement est realise. 

— En mode emulation (E = 1), ajouter 1 cycle si le 
branchement est realise et si une page memoire 
est franchie. 

Annulation de la retenue — Clear 
Carry Flag (C = 0). On force d le bit 
de retenue. Surtout employe avant une addition 
(ADC) pour I'effectuer sans retenue. Force a zero le 
bit C du registre d'etat. 

CLD Annulation du mode decimal — Clear 
Decimal Mode (D = 0), On force d le 
bit D pour positionner I'unite arithmetique en mode 
binoire. Utilise pour effectuer ADC et SBC. Force a 
zero le bit D du registre d'etat. 
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Autorise les interruptions Clear 
Interrupt Disable Bit (I - 0). On force 
d le bit I, inhibition des interruptions IRQ, ce qui 
autorise ces interruptions. Cette instruction est 
encore utilisee pour la fin des sequences critiques 
pendant lesquelles on inhibe les interruptions par 
SEI. Force 6 zero le bit I du registre d'etat. 

Annulation de I'indicateur de dehor- 
dement — Clear Overflow Flag (V = 
Q). Posifionne I'indicateur de depassement de 
eapacite a la valeur 0. On force a le bit V du 
registre d'etat. 

Compare la memoire a I'accumulateur 
— Compare Memory and Accumula 
tor. On effectue la soustraction virtuelle entre 
I'occumulateur et la memoire, Le resultat n est pas 



remis dans I'accumulateur qui reste inchange. Les 
indicateurs N, Z el C sont positionnes d'apres le 
resultat. Pour prevoir I etat de N, laire X + com- 
plement de la memoire, ou N sera correct s'il n'y a 
pas de debordement. V reste inchange. 

COP Initialisation d'une sequence d'inter- 
ruption — Coprocesseur. Deux modes 
d'interruptions peuvent etre geres par le micropro- 
cesseur 65C81 6. en purticulier les interruptions 
logicielles {Software) controlees por I'instruction 
COP. Les programmers sous systeme ProDOS 
auront vite fait le rapprochement avec ledit 
systeme Sexploitation. L'instruction COP affecte le 
contenu des registres PB (Program Bank Register) 
et OB (Data Bank Register), Force a Q le bit D et a 1 
le bit I du registre d'etat, 



MODE NATIVE (E = 0, mode 16 bits) 

Dans ce mode, lors d'une interruption 
Hardware, le registre PB est purge et ini- 
tialise par des zeros (00). BRK ou COP est 



execute. Le contenu du registre PB sera 
automatiquement sauvegarde sur le som- 
met de la pile (8 bits). 



MODE EMULATION (E = 1, mode 8 bits) 



Dans ce mode, lors d'une interruption 
Hardware, les registres DB et PB sont pur- 
ges ei des zeros ecrits a ces emplace- 



COP Flag (Signature) 



Les valeurs de $00 a $7F inclus sont utili- 
sees par le systeme comme signature, 
tandis que les valeurs de $80 a $FF inclus 



ments. BRK ou COP est execute. Le contenu 
de I'adresse du registre PB ne sera pas 
automatiquement sauvegarde sur la pile. 



sont reservees pour une utilisation future 
{extension 6 32 bits avec le microproees- 
seur 65C832). 



Hardware Interrupt - ABORT, IRQ, NMI ou RESET 



REGISTRE 


OPERATION EFFECTU& 


PC 


Operation interne. 






PC 


Operation interne. 






s 


Sauvegarde de PB sur la pile. 






s 


Sauvegarde de PCH sur la pile. 






s 


Sauvegarde de PCL sur la pile. 






s 


Sauvegarde de P sur la pile. 






VL 


Lecture de I'adresse pour la gestion de I'erreur — 


LByte. 




VH 


Lecture de I'adresse pour la gestion de I'erreur - 


HByte. 


(suite page 12) 
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Software Interrupt - BRK, COP 





— . — . 

OPERATION EFFECTUEE 


PC 2 


Opcode 




PCI 


Signature 




S 


Sauvegarde de PB sur la pile. 




S 


Sauvegarde de PCH sur la pile. 




s 


Sauvegarde de PCL sur la pile. 




s 


Sauvegarde de P sur la pile. 




VL 


Lecture de f'adresse pour la gestion de Perreur 


— LByte. 


VH 


Lecture de 1 adresse pour la gestion de I'erreur 


— HByte. 



Tableau des vecteurs d'interruption 



INTERRUPTION 


ORIGINE 


Emulation (e = i) 


MODE 65C816(E = 0) 


ABORT 


Materiel 


$0QFFF8 /$00FFF9 


$0aFFE8 /$00FFE9 


BRK 


Logiciel 


$O0FFFE /SaOFFFF 


$00FFE6 / $00 FFE7 


COP 


Logiciel 


$0OFFF4 / $<J0F FF5 


$00FFE4 /$00FFE5 


IRQ 


Materiel 


$0fJFFFE /$OOFFFF 


$G0FFEE /$00FFEF 


NMI 


Materiel 


$aaFFFA/$aOFFFB 


$00FF E A / $©5fFEB 


RESET 


Materiel 


$00FFF C / $0(7F FFD 


$00FFFC / S00FFFD (i-t) 



CPX Compare la memoire au registre X — 
Compare Memory ond Index X. Effec- 
tue la soustraction virtuelle entre le registre 
d'index X et la memoire. Les indicateurs N, Z et C 
sont positionnes suivant le resultat. Pour prevoir 
J'etat de N, faire X + complement de la memoire, 
ou N sera correct s'll n'y a pas de debordement. V 
reste incnonge. 

Compare la memoire au registre Y — 
Compare Memory and Index Y. Effec- 
tue la soustraction virtuelle entre le registre 
d'index Y et la memoire, et positionne les indica- 
teurs N, 1 et C suivant le resultat. Pour prevoir 
I'etat de N, effectuer Y 4- complement de la 
memoire, ou N sera correct s'il n'y a pas de debor- 
dement. V reste inchange. 

Decrementation de la memoire ou de 
I'accumuloteur — Decrement Memory 
or Accumulator by One. On diminue de 1 le con- 
tenu de la memoire indiquee. Agit sur les bits N et 
Z du registre d'etat. Pour tous les modes d'adres- 
sage utilisant les instructions relatives a Read/ 



Modify/Write, excepte I'adressage accumulates, 
les regies sulvantes sont h oppliquer ; 

— Ajouter 2 cycles si E = 1 ou E = et M = 1 (8 
bits mode) ; 

— Ajouter 3 cycles si E = et M = (16 bits 
mode). 

Decrementation du registre d'index X 

— Decrement Index X by One. On 
diminue de 1 le contenu du registre d'index X. Agit 
sur les bits N et Z du registre d'etat. 

Decrementation du registre d'index Y 

— Decrement Index Y by One. On 
diminue de 1 le contenu du registre d'index Y. Agit 
sur les bits N et 2 du registre d'etat, 

EOR OU exclusif — Exclusive OR Memory 
with Accumulator. On effectue le OU 
exclusif bit a bit entre I'accumulateur et la 
memoire suivant la toble de verite. Agit sur les bits 
N et Z du registre d'etat. 
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Table de verite 



Q EOR = 

EOR 1 = 

1 EOR = 
1 EOR 1 = 



Incrementation de la memoire ou de 

I'accumuJateur — Increment Memory 

or Accumulator by One. On augmente de 1 le con- 
tenu de la memoire indiquee, Agit sur les bits N et 
Z du registre d'etat. Pour tous les modes d'adres- 
sage utilisant les instructions relatives a Read 
Modify /Write, excepte I'adressage accumulates, 
les regies suivantes sont a appliquer : 

— Ajouter 2 cycles si E = 1 ou E = et M = 1 (B 
bits mode) ; 

— Ajouter 3 cycles si E = et M = (16 bits 
mode). 

Incrementation du registre d'index X 

— Increment Index X by One. On aug- 
mente de 1 le contenu du registre d'index X. Agit 
sur les bits N et Z du registre d'etat. 

Incrementation du registre d'index Y 

— Increment Index Y by One. On aug- 
mente de 1 le contenu du registre d'index Y, Agit 
sur les bits N et Z du registre d'etat. 

Saut inconditionnel long — Jump 
Long. Cette instruction est equiva- 
lente au JMP. JML realise un branch em ent a un 
nouveau vecteur de la memoire avec une adresse 
sur 24 bits. Adressage absolu indirect. Aucune 
action sur le registre d'etat. 

Saut inconditionnel sur 16 bits — 
Jump to New Location. On saute a 
I'odresse indiquee. Effectue un branchement avec 
un sout inconditionnel suivant le mode d'adressage 
utilise. Adresse de 16 bits de large. Aucune action 
sur le registre d'etat. 

Saut long a un sous-programme 
(adresse 24 bits) — Jump to Long. 
Cette instruction est equivalente au JSR, appel d'un 
sous-programme. Adressage absolu. Aucune 
action sur le registre d'elat. 

Appel d'un sous-programme — Jump 
to New Location Saving Return 
Address. On sauve PC (JSR + 2) sur la pile pour 
memoriser I'odresse de retour, puis saut a 
I'odresse indiquee. Aucune action sur le registre 
d'etat. 

Chargement de I'occumulateur — 
Load Accumulator with Memory. On 



charge I'accumulateur avec la valeur se trouvant a 
I'emplacement de la memoire indiquee. La 
memoire elle-meme n est pas modifee. Agit sur les 
bits N et Z du registre d'etat. 

Charge le registre d'index X — Load 

Index X. On met dans le registre X le 

contenu de la memoire indiquee. La memoire n'est 
pas modifiee. Agit sur les bits N et Z du registre 
d'etat. 

LDY Charge le registre d'index Y — Load 
Index Y. On met dans le registre Y 
le contenu de la memoire indiquee. La memoire 
n'est pas modifiee. Agit sur les bits N et Z du 
registre d'etat. 

Deed age d un bit vers la droite — 
Shift One Bit Right Memory or Accu- 
mulator. On decale d'un bit vers la droite I'accumu- 
lateur ou la memoire. Agit sur ies bits Z, C et force 
a le bit N du registre d'etat. Pour tous les modes 
d'adressage utilisant les instructions relatives a 
Read/Modify/Write, excepte I'adressage accumu- 
lateur, les regies suivantes sont a appliquer : 

— Ajouter 2 cycles si E = 1 ou E = et M = 1 (8 
bits mode) ; 

— Ajouter 3 cycles si E = et M = (16 bits 
mode). 

Deplacement negatif de bloc — Block 
Move Negative. Cette instruction est 
utllisee en liaison avec le mode d'adressage Block 
pour deplacer un bloc de donnees d'un emplace- 
ment memoire vers un autre. MVN incremente les 
registres d'index X et Y utilises comme compteur 
de bytes. Le premier byte de I 'instruction contient 
le code de I'instructton. Le second byte contient les 
8 bits de poids fort de I'adressage de destination. 
Le troisieme byte contient les 8 bits de poids fort de 
l adresse source. Le registre Y contient les 16 bits 
de poids faible de I'odresse de destination. Le 
registre X contient les 16 bits de poids faible de 
l adresse source. L'accumulateur contient la valeur 
du nombre de bytes a deplacer, moms un. Le 
second byte relatif 6 I'instruction Block Move se 
trouve localise dans le registre page de donnees 
(Data Bank Register). 

Deplacement positif de bloc — 
— Block Move Position. Cette instruc- 
tion est utilisee en liaison avec le mode d'adres- 
sage Block pour deplacer un bloc de donnees. 
MVP decremente les registres d'index X et Y uti- 
lises comme compteur de bytes. L'accumuloteur 
est decremente si son contenu a une valeur 
positive, d'oii PC < PC + 3. Les regies relati- 
ves aux registres restent les m ernes que pour 

I'instructton MVN. (suite page 14) 
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Pas d'operation — No Operation. Ins- 
truction sans effet, qui ne fait aucune 
action mois utilise neonmoins 2 cycles et necessite 
un byte. Utilise apres la phose de mise au point de 
programmes pour remplocer des instructions sup- 
primees. Aucune action sur le registre d'etat. 

OU logique entre la memoire et 
I'accumulateur — OR Memory with 
Accumulator. On effectue le OU logique bit a bit 
entre I'accumulateur et la memoire conformement 
a la table de verite. Agit sur les bits N et Z du regis- 
tre d'etat. 

Empile I'adresse absolue ou une don- 
nee en mode immediat — Push Effec- 
tive Absolute Address on Stack (or Push Immediate 
Data on Stack). Empile I'adresse absolue ou une 
donnee lors de ladressage immediat, Se rapporte 
a toute instruction relative a ladressage de la pile 
(empile). Aucune action sur le registre d'etat 

Empile I'adresse indirecte — Push 
Effective Indirect Address on Stack. 
Ajoute 1 cycle a I'operation si le contenu du regis- 
tre DL (Direct Low Register) est egal a zero (DL = 
0], Aucune action sur le registre d'etat, 

Empile l adresse relative au PC — 
Push Effective Program Counter 
Relative Address on Stack. Empile I'adresse 
relative au eompteur ordinal, Aucune action sur 
le registre d'etat, 

Empile I'accumulateur (AL ou A) — 
Push Accumulator on Stack. On place 
le contenu de ('accumulates au sommet de la pile 
et on met a jour le pointeur de pile. A reste intact, 
Aucune action sur le registre d'etat. 

P H B Empile le registre page de donnees — 
Push Data Bank Register on Stack. On 
place le contenu du registre page de donnees au 
sommet de la pile et on met 6 jour le pointeur de 
pile. Aucune action sur le registre d'etat. 

Empile le registre direct (D) — Push 
Direct Register on Stack. On place le 
contenu du registre direct au sommet de la pile et 
on met d jour le pointeur de pile. Aucune action sur 
le registre d'etat. 

Empile le registre page programme 
— Push Program Bank Register on 
Stack. On empile le registre page programme et 
on met a jour le pointeur de pile. Aucune action 
sur le registre d'etat. 

Empile le registre d'etat (P) — Push 
Processor Status on Stack. On place 



le contenu du registre d'etat au sommet de la 
pile et on met a jour le pointeur de pile. P reste 
intact. Aucune action sur le registre d'etat. 

Empile le registre d'index X — Push 
Index X on Stack, On copie le con- 
tenu du registre X au sommet de la pile et on 
met a jour le pointeur de pile. Aucune action sur 
le registre d'etat. 

PHY Empile le registre d'index Y — Push 
Index Y on Stack. On depose le con- 
tenu du registre Y au sommet de la pile et on 
met a jour le pointeur de pile. Aucune action sur 
le registre d'etat. 

PL A Depile I'accumulateur (AL ou A) — 
Pull Accumulator from Stock, On 
transfere vers I'accumulateur le contenu du som- 
met de la pile et on met a jour le pointeur de pile. 
Agit sur les bits N et Z du registre d'etat. 

Depile le registre page de donnees — 
Pull Data Bank Register from Stack. 
On transfere vers le registre DB le contenu du som- 
met de la pile et on met a jour le pointeur de pile. 
Agit sur les bits N et Z du registre d'etat, 

Depile le registre direct (D) — Pull 
Direct Register from Stack. On trans- 
fere vers le registre D le contenu du sommet de la 
pile et on met d jour le pointeur de pile. Agit sur les 
bits N et Z du registre d'etat. 

Depile le registre d'etat (P) — Pull 
Processor Status from Stack. On trans- 
fere vers le registre P le contenu du sommet de la 
pile et on met d jour le pointeur de pile. Agit sur les 
bits N, V, M, X, D, I, ZetC du registre d'etal. 

Depile le registre d'index X — Pull 
Index X from Stack. On depose le con- 
tenu du sommet de la pile dans le registre d'index 
X et on met d jour le pointeur de pile Agit sur les 
bits N et Z du registre d'etat. 

Depile le registre d'index Y — Pull 
Index Y from Stack. On depose le con- 
tenu du sommet de la pile dans le registre d'index 
Y et on met d jour le pointeur de pile. Agit sur les 
bits N et Z du registre d'etat. 

Met a zero des bits du registre 
d'etat {P) — Reset Status Bits. Per- 
met de positionner d zero la valeur des bits du 
registre d'etat apres un test de bits par exemple 
(BEQ, BNE, etc.). Agit sur les bits N, V, M, X, D, 
I, Z et C du registre d'etat. 
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Rotation d'un bit vers la gauche — 
Rotate One Bit Left — Memory or 
Accumulator. Decale d'un bit vers la gauche le con- 
tenu de l'accumulateur ou de la memoire. 
L'ancienne valeur du bit de retenue entre par la 
droite, tandis que le bit qui sort por la gauche cons- 
titue la nouvelle valeur de C. Agit sur les bits N, Z 
et C du registre d'etat. Pour tous les modes 
d'adressage utilisant les instructions relotives a 
Read/Modify/Write, excepte I'adressage accumu- 
lates, les regies suivantes sont a appliquer : 

— Ajouter 2 cycles si E = 1 ou E = et M = 1 (8 
bits mode) ; 

— Ajouter 3 cycles si E = et M = (16 bits 
mode). 

Rotation dun bit vers la droite — 
Rotate One Bit Right Memory or Accu- 
mulator. Decale d'un bit vers la droite le contenu 
de 1'accumulateur ou de la memoire. L'ancienne 
valeur entre par la gauche et le bit qui sort par la 
droite constitue la nouvelle valeur de C. Agit sur 
les bits N, Z et C du registre d'etat. Pour tous les 
modes d'adressage utilisant les instructions relati- 
ves a Read /Modify /Write, excepte I'adressage 
accumulateur, les regies suivantes sont 6 
appliquer : 

— Ajouter 2 cycles si E = 1 ou E = et M = 1 (8 
bits mode) ; 

— Ajouter 3 cycles si E = et M = (16 bits 
mode). 

Retour d'interruption — Return from 
Interrupt. Retour de sous-programme 
ou de routine d'interruption. On recupere sur la 
pile les contenus de PC (compteur ordinal) et P 
(registre d'etat) qui y avaient ete sauvegordes au 
preolable par le mecanisme d'interruption et on 
met 6 jour le pointeur de pile. On reprend I'execu- 
tion la ou elle avait ete laissee lors de ('interrup- 
tion. Agit sur les bits N, V, M, X, D, I, Z et C du 
registre d'etat. 

RTL Retour d'un sous-programme appele 
par JSL {24 bits) — Return from Sub- 
routine Long. On recupere sur le sommet de la pile 
le PC et le contenu de PB lors d'un retour de sous- 
programme long (adresses de $000000 6 SFFFFFF). 
Aucune action sur le registre d'etat. 

Retour d'un sous-programme appele 
par JSR (16 bits) — Return from Sub- 
routine. On recupere sur la pile le PC (compteur 
ordinal) qui avait ete sauve par le dernier JSR. On 
reprend I'execution du programme principal direc- 
tement derriere I'appel au sous-programme. 
Aucune action sur le registre d'etat. 



Soustrait la memoire avec la retenue 
a l'accumulateur — Subtract Memory 
from Accumulator with Borrow. On soustrait de 
1'accumulateur le contenu de la memoire indiquee 
et I'oppose de la retenue (I'emprunt). On opere en 
mode decimal ou en binaire. Agit sur les bits N, V. 
Z et C du registre d'etat. 

SEC Met la retenue a 1 (C = 1 ) — Set Carry 
Flag. Est utilisee particulierement 
avant SBC pour effectuer une soustraction sans 
retenue. Force a 1 le bit C du registre d'etat. 

Met en mode decimal (D - 1) — Set 
Decimal Mode. Met l unite arithmeti- 
que en mode decimal. Force a 1 le bit D du registre 
d'etat (par exemple avant ADC ou SEC). 

Met en mode non interruptible (1 = 1) 

— Set Interrupt Disable Status. Inhibe 
les interruptions. Force a 1 le bit I d'inhibition des 
interruptions IRQ, ce qui o comme effet de mas- 
quer ces interruptions. Si la demande d'interrup- 
tion est maintenue sur la borne IRQ du micropro- 
cesseur (pin IRQ = 0) Interruption sera prise en 
compte des que le bit I sera remis a zero. Tres utile 
pour changer le vecteur d'interruption. 

Met a 1 des bits du registre d'etat (P) 

— Set Processor Status Bits. Force a 1 
les bits du registre d'etat. Agit sur les bits N, V, M, 
X, D, l t Z et C du registre d'etat. 

Sauvegarde de l'accumulateur a un 
emplacement memoire — Store Accu- 
mulator in Memory. On transfere le contenu de 
l'accumulateur (AL ou A) dans la memoire indiquee 
tandis que l'accumulateur reste inchange. Aucune 
action sur le registre d'etat. 

— Ajouter 1 cycle en mode Emulation (E = 1) pour 
les modes d'adressage suivants : 

• Direct indexe par Y ; 

• Absolu indexe par X ; 

• Absolu indexe par Y. 

Arrete I'horloge — Slop the Clock. 

Cette instruction interrompt le circuit 
d'horloge du microprocesseur. A ce stade, le bus 
de donnees reste disponible pour le transfert de 
donnees, tondis que le banc d'adresses n'est plus 
en mode multiplexe (pour le bus de donnees). Le 
circuit d'horloge du processeur est relance en 
effectuant un RESET du systeme, Aucune action sur 
le registre d'etat. 

Sauvegarde de X a un emplacement 
memoire — Store Index X in Memory. 
On transfere le contenu du registre d'index X vers 
I'emplacement de la memoire indiquee, tandis que 
X (XL ou X) reste inchange. Aucune action sur le 
registre d'etat (suite page \6) 
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Souvegorde de Y 6 un emplacement 
memoire — Store Index Y in Memory. 
On tronsfere le contenu du registre d'index Y vers 
('emplacement de la memoire indiquee, tandis que 
Y (YL ou Y) reste inchange. Aucune action sur le 
registre d'etat. 

Met a zero un emplacement memoire 
— Store Zero in Memory, Place des 
zeros 6 I'emplacement de la memoire indiquee. 
Aucune action sur le registre d'etat, 
— Ajouter 1 cycle en mode emulation (E = 1) pour 
les modes d'adressage suivants : 

• Direct indexe par Y ; 

• Absolu indexe par X ; 

• Absolu indexe par Y, 

Transfert de 1'accumuloteur dans X — 
Transfer Accumulator to Index X. On 
met le contenu de I'accumulateur (AL ou A) dans le 
registre d'index X (XL ou X). Le contenu de I'accu- 
mulateur reste inchange, Agit sur les bits N et Z du 
registre d'etat. 

Transfert de 1'accumuloteur dans Y — 
Transfer Accumulator to Index Y. On 
met le contenu de I'accumulateur (AL ou A) dans le 
registre d'index Y (YL ou Y), Le contenu de I'accu- 



mulateur reste inchange. Agit sur les bits N et Z du 
registre d'etat. 

Transfert de I'accumulateur (C — 16 
bits) dans le registre D — Tronsfert 
Accumulator to Direct Register. On copie le con- 
tenu de I'accumulateur (C) dans le registre direct 
(D). Le contenu de I'accumulateur reste inchange. 
Agit sur les bits N et Z du registre d'etat. 

Transfert de I'accumulateur {C — 16 
bits) dans S — Transfert Accumula- 
tor to Stack Pointer Register. On copie le con- 
tenu de I'accumulateur (C) dans le registre poin- 
1eur de pile (S). A reste inchange. Aucune action 
sur le registre d'etat. 

TDC Transfert de D dans C (accumulates 
16 bits) — Transfer Direct Register 
to Accumulator. On copie le contenu du registre 
d'adressage direct (D) dans I'accumulateur (C). 
D reste inchange. Agit sur les bits N et Z du 
registre d'etat. 



TUB 

des bits 
mulateur. 



Test et met d zero des bits — Test 
and Reset Bit. Teste et met 6 zero 
de la memoire a I'aide de I'accu- 



MODE EMULATION (E =1) 



Effectue un AND logique entre le contenu de 
raccumulateur (Low Accumulator — registre 



MODE NATIVE (E = 0) 



Effectue un and logique entre le contenu de 
I'accumulateur (Accumulator — registre 16 
bits) et I expression representant une adresse 
effective, moins la valeur orithmetique de 
ladite expression. Agit sur le bit Z du registre 
d'etat. Pour tous les modes d'adressage de 
TRB, excepts I'accumulateur, si le bit Z du 
registre d'etat est determine ou modifie lors 



8 bits) et I'adresse effective, moins ladite 
adresse. Agit sur le bit Z du registre d'etat. 



du resultat des operations A OR B ou A OR W 
et pour toute commande relative d Read/ 
Modify/Write, la regie suivante est d 
appliquer : 

— Ajouter 2 cycles si E = 1 ou E = et le bit 
AA = 1 (8 bits mode) ; 

— Ajouter 3 cycles si E = et le bit M = Q 
(16 bits mode). 



Teste et met a 1 des bits — Test 
and Set Bit. Teste et met a 1 des 



MODE EMULATION (E =1) 



Effectue un OR logique entre le contenu de 
l'accurnulateur (Low Accumulator — registre 



bits de la memoire a 
mutateur. 



I'aide de I'accu - 



8 bits) et I'adresse effective, moins ladite 
adresse. Agit sur le bit Z du registre d'etat, 



MODE NATIVE (E = 0) 

Effectue un OR logique entre le contenu de I'accumulateur (Accumulator — registre 16 bits) 
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et 1'expression representor^ une adresse 
effective, mains la valeur arithmetique de 
ladite expression. Agit sur le bit Z du registre 
d'etat. Pour tous les modes d'adressage de 
TR6, excepte I'occumulateur, si le bit Z du 
registre d'etat est determine ou modifie lors 
du resultat des operations A OR B ou A OR W 



et pour toute commande relative a Read/ 
Modify Write, la regie suivante est d 
appliquer : 

— Afouter 2 cycles si E = 1 ou E = et le bit 
M - 1 (8 bits mode) ; 

— Ajouter 3 cycles si E = et le bit M = 
(16 bits mode). 



Translert de S dans C (accumulateur 
16 bits) — Transfer Stack Pointer 
Register to Accumulator. On copie le pointeur de 
pile (S) dans I'accumulateur (C), S reste inchonge, 
Agit sur les bits N et Z du registre d'etat, 

Transfert de S dans X — Transfer 
Stack Pointer Register to Index X. On 
copie le pointeur de pile (5) dans le registre d'index 
X. S reste inchange. Agit sur les bits N et 2 du 
registre d'etat. 

Transfert de X dans I'accumulateur — 
Transfer Index X to Accumulator. On 
copie le contenu du registre d'index X dans I'accu- 
mulateur, tandis que X reste inchonge. Agit sur les 
bits N et Z du registre d'etoi 

Transfert de X dans S — Transfer 
Index X to Stack Pointer Register. On 
copie le contenu du registre d'index X dons le 
registre pointeur de pile (S), tandis que X reste 
inchange. Aucune action sur le registre d'etat, 

Transfert de X dons Y — Transfer 
Index X to Index Y. On copie le con- 
tenu du registre d'index X dans le registe d'index 
Y, tandis que X reste inchange. Agit sur les bits N 
et Zdu registre d'etat. 

Transfert de Y dans I'accumulateur — 
Transfer Index Y to Accumulator, On 
copie le contenu du registre d'index Y dans I'accu- 
mulateur, tandis que Y reste inchange. Agit sur les 
bits N et Z du registre d'etat. 

Transfert de Y dans X — Transfer 
Index Y to Index X. On copie le con- 
tenu du registre d'index Y dans le registre 
d'index X, tandis que Y reste inchange. Instruc- 



tion complementaire a TXY, Agit sur les bits N et 
Z du registre d'etat. 

Attend une interruption — Wait for 
Interrupt. Cette instruction met en 
attente le systeme pour detecter une interruption 
sur lo broche 2 (RDY — Ready) du microprocesseur 
65C816. N'agit sur aucun des bits du registre d'etat. 

Permute AH ovec AL de C — Exchange 
B and A Accumulator, Permutation de 
I'octet de poids faible (AL ou A) avec I'octet de 
poids fort (AH ou B) du registre accumulateur de 16 
bits de large (C), La position des bits du registre 
d'etat conditionne I'utilisation du registre AL (Low 
Byte de I'accumulateur). Agit sur les bits N et Z du 
registre d'etat. 

Permute les bits de retenue et d emu- 
lation (C t 5 E) — Exchange Carry 

and Emulation Bits. Permute la Carry (C) avec le bit 
d'emulation (E) pour n'importe quelle valeur de E 
(XH = ; YH = ; SH = 1 ; bit M = 1 ; bit X = 1), 
Le bit E est interne au microprocesseur et de ce fait 
non accessible directement par le programmer, 
Cette instruction pemet de passer dun mode 
d'adressage d un autre (emulation ou native ou 
inversement). Pour cela, il suffit de positionner lo 
retenue (Carry Flag) et dexecuter Pinstruction 
XCE. En mode emulation, E = 1 , le microproces- 
seur fonctionne comme le 6502, c'est-d-dire en 8 
bits. En mode native, E = 0. le mode 16 bits est 
actif. Si le bit 4 (bit X) du registre d'etat est mis a 
zero, alors les registres d'index sont utilises en 16 
bits. Si le bit 5 (bit AA) est positionne d zero, I'acces 
a la memoire pourra se faire en 16 bits, Agit sur le 
bit C du registre d'etat et permute celui-ci avec le 
bit d'emulation (bit E). 



Marcel COTTINI continuera, dans les prochains num^ros de 
TREMPLIN MICRO, & vous aider a vous familiariser avec le 
65C816, mais aussi avec ProDOS, systeme d'exploitation 
avec lequel il faudra de plus en plus compter. 



TREMPLIN MICRO 



17 



DOS 3.3 



Marcel COTTINI 



UTILITAIRE 



DIRECTORY UTILITY 



Pour APPLE //, 
II + , HE, 
Ue+ et lie 



Cet utilitaire vous rendra de nombreux services en autorisant la mise en place, dans 
votre catalogue (directory) de disquette, de certaines dispositions nouvelles. Plusieurs 
possibilites vous seront offertes, suivant que vous desirerez cacher un nom de pro- 
gramme, le restituer par la suite, ou encore mettre en place des titres pour reperer des 
sous-programmes eventuels. Placer des lignes d espace sera un jeu denfant. Le nom de 
vos fichiers textes pourra etre modifie pour adopter une presentation sans les parame- 
tres caracteristiques (type de fichier et occupation des secteurs). Seul point noir au 
tableau : le nom du Fichier ne devra pas depasser la faille de 21 caracteres maximum. 
Cette situation est imposee par la mise en place d un artifice decalant de huit positions 
( emplacement du nom du fichier dans son entree de la table des matieres. 



A propos du programme 



Lors de I'execution du programme, un menu sero affiche : 



\\) Cacher un programme. 
(2) Recuperer le programme. 
(I) Mise en place rirre. 
44) Mise en place fichier titre 
(5) Recuperer fichier litre 



Detail de chaque option : 



Cacher un programme 

Cette option du menu permet la modification du nom 
d'un programme du type Basic Applesoft, Texte ou 
Binaire. Dans les deux premiers cas, le nom du pro- 
gramme aura totalement disparu apres ( utilisation de 
1'utilitaire. Dans le dernier cos, utilisation d'un nom 
representont un fichier Binaire, celui-ci restera appa- 
rent, mais ne pourra plus etre execute. Cette pratique 
permet de proteger dans une certaine mesure 
cerlains de vos programmes, qui ne pourront elre 
executes que par un artifice (consulter a cet effet les 
lignes 350 6' 



Recuperer le programme 

Option complementaire de la precedente, permetlant 
de recuperer le nom d'un fichier rendu inoperant par 
le menu (1). Les lignes 509 6 530 permettent a partir 
d'un autre programme, dappeler et dexecuter un 
fichier traite par I option (1 }. 



Mise en place titre 



Option permettont de donn 
votre table des matieres de 
donne a loisir de placer des 
mettant de dosser vos 
programmes au niveau du 
despace, pour effectuer un 
ment outorisees. loption 5 
nom du titre et de le convert 
une eventuelle elimination* 



er un certain cachet a 
a disquette. II vous sera 
titres ou sous-litres per- 
programme5 et sous- 
directory. Des lignes 
travoil fini, sont egale- 
permet de recuperer le 
r en nom de fichier pour 
du directory (DELETE). 



Mise en place f ichier/titre 

Option speciolement etudiee pour trailer les noms 
des fichiers texte. Elle permet de re idre invisible au 
niveau du directory, lout nom de lid ler texte. Elle est 
en somme similaire a loption (1) qi i traite les autres 
types de fichiers. 

Recuperer fithier texte 

Option complementaire a la precedente, elle autorise 
la recuperation du nom du fichier texte traite avec 
l option (4), M. C. 

A vos claviers pour effectuer te menage ay niveau de la table des 
mat teres de vos disqueties. Avec un peu de mail rise, cet utilitaire 
vous permettra de realiser des protections au niveau de I'acces 
au nom de vos fichiers.. par fe simple fait de deplacer I entree? 
dans la table des matieres. A cet effet, je vous conseille de lire du 
meme auteur. I'ouvroge sur le DOS 3.3, GUIDE LU PROGRAM- 
MEUR r edite par les editions du SYBEX. II y figure en bonne place, 
outre les vecteurs utilises par le OOS. le detail d'une disquette.. en 
porticulier les entrees de la table des matieres avec tout les para- 
metres disponibles. Un livre indispensable dans votre b'tbiiothe- 
que Apple. NESTOR 
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REM ctMctM MENUc±M cJJc_tJ 




298 


GET A*: IF ft* = CHR* (27) T 




28 


CALL 1902: REM REVECT0R1SE L 






HEN 50 


BD09 




E DOS 


1 4F 


308 


IF CAt < > n " AND A* = CHR 




30 


ONERR GOTO 1118 


EB1 3 




% (13) THEN A* = CAt: GOTO 3 




46 


D* = CHRt (13) + CHRt (4) 


8 6 : : 




50 


43F5 


58 


OA* = " " : At = " u : Bt = " n : C* 

II II , U II 


9996 


310 


IF At = CHR* CI 3) THEN GOS 
UB 1120: GOSUB 1128s GOTO 27 




40 


TEXT : HOME : INVERSE 


21 32 







32E2 


78 


'■/TAB 2: PRINT " :" ; SPC< 12) : 




328 


PRINT At; 


A75A 




HTAB 28: PRINT SPC< I2)]*i n 




338 


CA* = CA* + A* 


i 740 




: VTAB 22: PRINT " :" ; SPC< 3 




349 


GOTO 290 


2946 




8) s" ; 


AB3E 


350 


PRINT Dt;" UNLOCK" ;At 




88 


FOR I = 3 TO 21 : VTAB 1 : HTA 
B 1 : PRINT ■ HTAB 49: PR 




368 
370 


Bt = At 

IF LEN (At) > 8 THEN At = 


209 B 




INT " ■ i i NEXT 






MID* <At,l ,8) 


0FA7 


98 


v'TAB 1 : HTAB 15s PRINT ": "" 




380 


FOR 1=1 TO 20 + LEN (A*) : 






i" : HTAB 15: PRINT " 






L* = Lt + CHRt <8) ! NEXT I 


0B76 




TITREUR: ": HTAB 15 I PRINT 




390 


PRINT D*j/ RENAME" ;B*j" , " ;At; 






u : " : N : NORMAL 


9045 




Li 


FCF0 


108 


MTAB 7: HTAB 5 


D8DE 


400 


PRINT D*;"LOCK" ;A*;Lt 


EE 15 


118 


PRINT "<1> CACHER UN PROGRAM 




418 


GOTO 50 


7418 




ME." 


AC2A 


420 


REM ctMctM RECUPERER LE PROG 




120 


MTAB 8: HTAB 5 






RAMME c tM 




138 


PRINT "<2> RECUPERER LE PROG 






ct Jet J 






RAMME . u 


5D20 


430 


HOME : PRINT "RECUP FICHIER: 




148 


MTAB 18: HTAB 5 


0788 




": PRINT P 




158 


PRINT "<3> MISE EN PLACE TIT 
RE." 


1487 




RINT : PRINT "Norn du -fichier 
a recuperer :'* : PRINT " > 




168 


■v'TAB 12: HTAB 5 


430A 




■ 


463A 


170 


PRINT ■ <4> MISE EN PLACE FIC 




448 


GET At: IF At = CHRt (27) T 






HI ER/TITRE . " 


BE 31 




HEN 58 


BD99 


188 


''/TAB 13: HTAB 5 


0O8B 


458 


IF CAt < > AND At = CHR 




198 


PRINT n <5> RECUPERER FICHIER 
/TITRE." 


9279 




t (13) THEN At = CAt: GOTO 5 
00 


3*F2 


200 


UTAB 17: HTAB 5 


450F 


460 


IF At = CHRt <13) THEN GOS 




210 


PRINT "MOT RE CHOIX : B 


2BA3 




UB U 28: GOSUB 1120: GOTO 42 




228 


MTAB 21 : HTAB 3 


0908 







0CDF 


233 


PRINT B < ESC > Pour quitter 




470 


PRINT At? 


A75A 




" : "v'TAB 1 7 : HTAB 28 


8EEB 


488 


CAt ■ CAt * At 


1 74D 


240 


GET Rt: IF Rt = CHRt <27) T 
HEN G0SU8 1128: GOSUB 1120: 
TEXT : HOME : UTAB 5: PRINT 




490 
580 

510 


GOTO 448 
Bt m At 

IF LEN (At) > 8 THEN At = 


F643 
299B 




" Termine. . . ■ : END 


3D73 




MID* (At,l ,8) 


0FA7 


258 


r = UAL (Rt) : IF R < 1 OR R 
> 5 THEN GOSUB 1128: GOSUB 




528 


IF LS<\ CAt) / 2 < > INT ( 
LEN (At) / 2> THEN At = MID 






1120: GOTO 240 


AC8E 




t CA*,1 , LEN (At) - A) 


4162 


260 


ON R GOTO 270,420,586,580,82 



2364 


538 


FOR I = 1 TO 28 + LEN 'At) : 
Lt = Lt + CHRt <8>: NEXT 3 


0B76 


270 


REM ctMc_tM CACHER UN PROGRAM 

MEc_tM c_tJ 

ctJ 




548 

550 


PRINT Dt ; n UNLOCK" ;At ; Lt 
PRINT Dt ; "RENAME" jAt ; Lt ; " , 11 ; 
Bt 


C6B8 
33F8 


280 


HOME : PRINT "NOM DU FICHIER 




560 


PRINT Dt;'TOCK";Bt 


9968 




A CACHER:": PRINT ■ > 1 ; 


2545 


570 


GOTO 50 


7410 



TREMPUN MICRO 
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DIRECTORY UTILITY (suite) 



588 
598 



699 



42C< 
430 

440 
450 



666 



488 
69% 
700 

719 
720 
730 



740 
750 

760 
776 
789 
790 

800 



820 



B30 



REM ctMctM PLACER UN TlTREcJ. 

M ctJct J 

HOME : PRINT "TITRES et ESPA 
CES: 1 '; PRINT "************** 
###*": PRINT : PRINT " - < R 
ETURN > Pour une ligne d" esp 
ace.": PRINT " - < CARACTERE 
S > Pour un titre." 
PRINT 
GOSUB 736 

'./TAB 9: HTAB 1 : CALL - 868 
PRINT "Tapez voire caractere 

de control e: " ; : GET C* 
IF C* = CHR* C27) THEN 50 
IF C* < CHR* (65) OR C* > 
CHR* <90> THEN GOSUB 1120: 
GOSUB 1120: GOTO 620 
FOR I = 1 TO 8:L* = L* + CH 
R* <8)r NEXT I 
IF B* = OR R = 3 THEN A* 
= "TITRE" : PRINT D*" BSAUf" ;A 
*" f A*2000,Lr 1 : GOTO 700 

a* = e* 

PRINT D* ;" UNLOCK " ;A* 
PRINT D* { 1 RENAME " ; A* ? " , 1 
L* ; B* 

PRINT D*; u LOCK";C*;L*;B* 
GOTO 56 

GET W*: IF W* = CHR* <8) TH 
EN CALL 
GOTO 790 
IF W* = 
IF W$ ~ 

L - 863: PRINT W* i 
B* = B* + W* 
PRINT M\ 

GOTO 730 

IF 8* = "" THEN 730 
PRINT W*;:B* = MID* <B*,1, 
LEN (B*) - 1) 
GOTO 730 

REM ctMctM RECUPERER LE TITR 
Ec_tM c_t Jci 

J 

HOME : PRINT "RECUP TITRE:": 
PRINT ■ **********»* u : PRINT 
: PRINT "Norn du -fichier apre 
s recuperation:": PRINT " — 

> "; 

GET A*: IF A* = CHR* (27) T 
HEN 50 



- 1008: PRINT " a ; : 

CHR* (27) THEN 50 
CHR* C13) THEN CAL 
RETURN 



8FC2 
75BA 
F94A 
B411 

3C37 
4BAE 



1 190 
EEEB 



F47C 
AB9B 
C10D 

E692 
DBB8 
7410 



EDD5 
1CC2 

A6AD 
EBDF 
*470 
2645 
0A85 

219E 
2B45 



850 IF CA* < > AND A* = CHR 
* <13) THEN A* = CA*: GOTO 9 



F4CB 
BD09 



840 



870 



90O 

910 
928 
930 



960 

970 
980 

990 
1060 
1016 

1026 
1636 



1040 

1050 

1060 
1070 
1086 

1690 
1100 

1110 

1120 

1136 



1140 
1150 



IF A* - CHR* U3) THEN 60S 

UB 1120: GOSUB 1120: GOSUB 1 

3 30: GOTO 320 

PRINT A*; 

CA* = CA* + A* 

GOTO 846 

PRINT : PRINT "Tapez son anc 
ien nom: " 
GOSUB 1010 

MTAB 9: HTAB 1: CALL - 868 
PRINT "Tapez uotre caractere 
de controls: " ; : GET C* 
LF C* = CHR* <27) THEN 50 
IF C* < CHR* <65) OR C* > 
CHR* (90) THEN GOSUB 1120: 
GOSUB 1120: GOTO 920 
FOR I ■ 1 TO 8:L* = L* ♦ CH 
R* (8) : NEXT I 
PRINT D*;" UNLOCK" ;C*;L*;B* 

■RENAME" ;C*;L*;B*;" 



CHR* (8) TH 



CHR* (27) THEN 50 
In AND W* = CHR* (1 
GOSUB 1129: GOSUB 1 



13) THEN RET 



PRINT D* ; 
,»;A* 

PRINT D*;"LQCK" ;i 
GOTO 56 

GET 14* J IF m = 
EN GOTO 1086 
IF W* = 
IF B* = 
3) THEN 
120: GOTO 1016 
IF U* = CHR* 
URN 

B* = B* + W* 
PRINT U*i 
GOTO 1010 
PRINT U)*; 
LEN (B*) - 
GOTO 1010 

REM ctMctM GESTION ERREURctM 

ctJc_tJ 

GOSUB 1120: GOSUB 1120: GOTO 
50 

FOR X = 1 TO 8:XX = PEEK <4 
9200) - PEEK (49200): NEXT 
X: RETURN 
UTAB 22: HTAB 1 
eur d 'en tree 1 ! 
apez une touche pour continu 
er. " j : GET R* 
IF R* = CHR* (27) THEN 50 
RETURN * 



51F6 



1E92 
A75A 
1 74D 
4E47 

B6B9 
5F72 
B41 1 

3C37 
4BAE 



3B93 

EEEB 
AB56 

1792 
3F4A 
7416 

1713 
1CC2 



:B* = 

) 



MID* <B*,1 , 



B168 

6599 
EBDF 
9470 
366D 

219E 
366D 



PRINT " Err 
': PRINT " T 



7A6C 


300 




303 




306 






308 


CAB9 




30 A 






30 O 






30E 






310 






312 


E43B 




314 


3BBD 




316 


63Bi 




318 



20 



GUY-HACHETTE 



TRE/Y 



LANGAGE MACHINE 



Clement RENARD 



ANAGRAMMES 



RECHERCHE DES ANAGRAMMES DANS LES MOTS DE SIX LETTRES 



ANA6 



OBJET : Rechercher les 
anogrammes d'un 
mot de six lettres dans un 
fichier binaire. 



FONCTIONNEMENT : 

Le court programme ci-contre 
montre que tout est fait par la 
routine LM, a partir de la ligne 
135. Seule la soisie du rnot-cle 
passe par le Basic. 



FICHIER : Vous lirez plus 
loin comment le 
constituer. La disquette TREM- 
PLIN MICRO vous fournit un 
fichier de plus de 3000 mots 
(noms communs). 



108 IGMEM : 28500: PR 
105 TEXT : HOME : PR 
110 GOSUB 165 
115 PRINT " RECHERCHE 

IX LETTRES" 
120 UTAB 7: CALL - 
125 PRINT "MOT DE 6 

18: INPUT " U ;M*: 
130 IF LEN CM*) < 
135 PRINT : CALL 768 
140 PRINT : VTAB 23: 

NU DE DISQUETTE 

TAB 22: PRINT 
145 IF R$ = M" THEN 
150 IF R$ = "2" THEN 

155 IF R$ < > -3" T 

160 HOME : END 

165 FOR I = 768 TO 3 
RETURN 

170 DATA 32,199,222, 
24,8,136,16,248, 
33,7,165,6,24,10 
177,25, 153, *5, 3, 

175 DATA 5,177,6,240 
,16,248,48,217,1 
9,177,6,9,128,32 
2,2,32,74,249,24 



INT CHR* <4) W BL0AD M6 " 
INT CHR$ <4> M PR£3 M : PRINT 

DES ANAGRAMMES DUN MOT DE S 

958 

LETTRES: ; : POKE 1493, 

IF M* = n * THEN 140 
) 6 THEN 120 

f m 

PRINT "<1> AUTRE MOT "<2> ME 
"<3> TERMINEctG " ; : GET R* : v 1 

126 

PRINT CHR* (4) "RUN MENU , Dl 
HEN 148 

62: READ R: POKE 1 , R : NEXT : 

32 , 227 , 223 , 1 60 , 2 , 1 77 , 1 3 1 , 1 53 , 
1 98 , 24 , 1 69 , 256 , 1 33 , 6 , 1 6? , 3 1 , 1 
5,6,133,6,344,2,238,7,164,24, 
136,16,248,160 

,41 ,166,24,221 ,95,3,240,5,202 
69 , , 1 57 , 95 , 3 , 1 36 , 1 6 , 232 , 1 60 , 
, 237 , 253 , 200 , 1 92 , 6 , 208 , 244 , 1 6 
8 ,188,96 



LES LIGNES DE DATA 



300 


20 


BE 


DE 


JSR 


SDEBE 


303 


20 


E3 


DF 


JSR 


$DFE3 _ 


306 


AO 


02 




LDY 


£$02 


308 




Bl 


83 




— LDA 


($83) ,Y 


30A 


99 


1 8 


00 


STA 


$0018, Y 


300 








DEY 




30 E 


10 


F8 




_ BPL 


$308 


310 


C6 


1 8 




DEC 


$18 


312 


A9 


FA 




LDA 


£$FA — 1 


314 


85 


06 




STA 


$06 


316 


A9 


1 F 




LDA 


£$1F 


318 


85 


07 




STA 


$07 _ 



244C 
E9EA 
294C 

6DBD 
A30E 

989C 
1E7F 
4BC2 



0A76 
7EBF 

5C82 
4393 
3E51 

9E! 4 



744B 



CE3C 



CHKCOAA teste la presence de la vtrgule et 
PTRGET recherche la variable par son nom. 

On sait lire la longueur de la variable (et son adresse) 
en $83-84. On sauvegarde ces renseingements en 
$18-1 9-1 A. 

Longueur = longueur — ■ 1 . 

L'adresse du fichier binaire ( — 6) 
est instaltee en $6-7. 

(Suite page 22) 
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RECHERCHE DES ANACRAMMES 



31A 

31C 

31 D 

31F 

321 

323 

325 



327 
329 
32C 
32D 
32F 



331 

53T 

335 



337 
33A 
33C 
33D 
33F 



341 

346 
347 



~A5 06 

18 

69 06 
85 06 
90 02 
E6 07 
A4 18 
Bl 1 9 
99 5F 03 
88 

10 F8 
AO 05 
Bl 06 
F0 29 
A6 18 
DD 5F 03 
F0 05 
CA 

10 F8 
_30 D9 
A9 00 
9D 5F 03 
88 

10 E8 



LDA 
CLC 
ADC 
STA 
BCC 
INC 
LDY 
LDA 
STA 
DEY 

. BPL 
LDY 
LDA 
BEQ 
LDX 
CMP 
BEQ 
DEX 

. BPL 
BMI 
LDA 
STA 
DEY 
BPL 



$06 

££06 

$06 

$0325 



"1 



$18 

($19), Y 
S035F.Y 



$0327 

rso3~ 

($06I,Y 

$035E 

$18 

SQ35F,X 



$0341 



i $0337 
$031 A 
£$00 
$035F,X 



i 



$0331 



L'adresse du fichier est incrementee de 6 pour lire les 
caracteres du mot suiv/ont. 



Longueur du mot dans Y. 

Le caractere de rang $19-1 A + Y dans TAccumulateur 
est sauvegarde en $35F + Y... et ainsi de suite. 

Longueur des mots du fichier (065 = 6). 

On Ut le caractere de rang $6-7 + Y. 

Si c'est un 0, le fichier est epuise : sortie. 

Longueur du mot que I'on teste dans X. 

Comparaison de I'accumulateur avec caractere. 

Si ego I, saut. 

Sinon, X = X — 1 pour controler le caractere sui- 
vant... 5i la boucle n est pas terminee. 
Le mot n'est pas une onagramme : retour au debut. 
Le caractere est mis a pour qu'on ne puisse pas I 'uti- 
lizer plusieurs fois. 
Y = Y — 1 . 

Tant que Y ne vaudra pas $FF, on bouclera... 



AFFICHACE DU MOT 



349 : 


AO 


00 




LDY 


£S00 


34B 




Bl 


06 




LDA 


($06), Y 


34D 




09 


80 




ORA 


£$80 


34F 




20 


ED 


FD 


JSR 


$FDED 


352 




C8 






INY 




353 




CO 


06 




CPY 


£S06 


355 




D0 


FA 




BNE 


|$034B | 


357 




A2 


02 




LDX 


£$02 


359 




20 


4A 


F9 


JSR 


$F94A 


35C 




_ F0 


BC 




BEQ 


$031 A 


35E 


60 






RTS 





Affichage du mot, caractere par caractere. 

ORA met le bit 7 6 1 (le fichier binaire contient des 

mots enregistres en ASCII). 



j On envoie 2 espoces. 

Vers un autre test. 
Retour au Basic. 



Recherche specialism 



RECH6 

OBJET : Rechercher, dons 
un fichier de 
mots de 6 lettres, ceux qui 
component tel ou tel carac- 
tere a tel rang (ligne 115). 

FONCTIONNEMENT : 

La saisie du "mot-cle", dans 
lequel les caracteres "nuls" 
seront remplaces par un 
tiret, est faite d partir du 
Bosk (ligne 125). 



199 LOMEM: 28568: PRINT CHR$ C4) 1 
185 TEXT : HOME : PRINT CHR* <4> 
118 GOSUB 165 

115 PRINT "RECHERCHE DES MOTS OE i 

ANT UNE PART I E D'UN MOT DE 6 LETTRES " 
ntaxe: -TOI ou UX ou encore -U — I> 

129 VTAB 7: CALL - 958 

125 PRINT "MOT DE 6 LETTRES: B ; : POKE 1483 

18: INPUT MW ;tt*: IF M* = ** THEN 140 
139 IF LEN <M*> > 6 THEN 128 
135 PRINT : CALL 768 ,M* 

148 PRINT : VTAB 23: PRINT "<1> AUTRE MOT "<2> 
NU DE DISOUETTE <3> TERMINEc_t_G ":: GET R$ 
TAB 22\ PRINT 



BLOAD M6 W 
PR£3" : PRINT 

LETTRES CONTEN 

<Sy 



ME 



244C 
E9EA 
294C 



6317 
A38E 

989C 
E8AE 
4BC2 
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E temple ; — J — E permetfra 

d'officher rous les mots de 6 
letires donf le 2* caractere esi un J er le der- 
nier un E : AJUSTE. AJOUTE par exemple. 

REMARQUE : llestinutitede 

taper tout le 

mot quand on ne desire tester que 
n caracteres. 

Ex. : — AN foumira la fisle des mots con- 
tenant AN en 2* e» 3 f positions 

LIMITES : Si vous tapez A et 
que votre tichier est 
complet, l ecran va se remplir de tous 
les mots commen^ant pas A... C'est 
sons donger mois pas joli et inutile. 
Vous pouvez evldemmenl modifier la 
DEMO en Basic pour leviter ! 



145 IF R$ = "1" THEN 126 

156 IF ^ »2" THEN PRINT CHR* <4> rt RUN MENU , Dl 
ii 

155 IF R* < > '3" THEN 146 
160 HOME : END 

165 FOR I = 768 TO 847: READ R: POKE I,Rs NEXT : 
RETURN 

170 DATA 32,190,222,32,227,223,160,2,177,131,153, 
24,8,136,16,248,198,24,169,256,133,6,169,31 ,1 
33,7,165,6,24,165,6,133,6,144,2,230,7,160,8,1 

77,6 

175 DATA 240,36,164,24,177,25,201,45,240,4,209,6, 
288,227,136,16,243,160,0,177,6,9,128,32,237,2 
53,206,192,6,288,244,162,2,32,74,249,240,203, 

96 



7EBF 

5C32 
4393 
8E51 

E517 



363C 



C9EE 



LES LICNES DATA 



300 


20 


BE 


DE 


JSR 


303 


20 


E3 


DF 


JSR 


306 


AO 


02 




LDY 


308 | 


Bl 


83 




LD.A 


30A 


99 


18 


00 


STA 


30 D 


88 






DEY 


30E 


10 


F8 




_ BPL 


310 


C6 


18 




DEC 


312 


A9 


FA 




LDA 


314 


85 


06 




STA 


316 


A9 


1 F 




LDA 


318 


85 


07 




STA 



31 A! 

31C 

31D 

31F 

321 

323 



325 
327 
329 
326 



32D 

331 
333 
335 



337 



33A 
33C 
33E 
340 
343 
344 
346 
348 
34A 
34 D 
[34f] 



"A5 06 
18 

69 06 
85 06 
90 02 
E6 07 



AO OO 
Bl 06 



F0 
A4 
Bl 



24 
1 8 
19 



C9 2D 
F0 04 
Dl 06 
-DO E3 
88 

10 F3 



LDA 

CLC 
ADC 
STA 
BCC 
INC 



LDY 
LDA 
BEQ 
LDY 
LDA 
CMP 
BEQ 
CMP 
B N E 
DEY 
BPL 



SDEBE 
SDFE3 
£$02 
($83). Y 
$001 8, Y 



S0308 

$T8 

£$FA 

$06 

£$1F 

$07 



Voir programme precedent. 



Longueur et adresse du "mot" de base 
sont sauvegardees en $18-1 A, 

Lo longueur est decrementee de 1 car le Q compte. 



L'adresse du fichier binaire des mots de six lettres est 
installee en S6-7 (adresse — 6). 



£$06 
$06 
$0325 
$07 



AO 00 
Bl 06 
09 80 
20 ED FD 

C8 

ca 06 

D0 F4 
A2 02 
20 4A F9 
F0 CB 
60 



LDY 
LDA 
ORA 
JSR 
INY 
CPY 
BNE 
LDX 
JSR 
BEQ 
RTS 



$033 7 
L$031A 



!$032D 



Adresse = adresse H~ 6 pour lire le mot suivant. 
Quand il y a retenue, 

il faut incrementer la partie haute ($7), 



RECHERCHE 



£$00 
( $06 ). Y 
IS034F 

($19), Y 
£$2D 



□ 



Y = {boucle). 

Lecture du caractere de rang $6-7 4- Y. 

Si le caractere fu dans le fichier est 0, c'est fini f 

Longueur du 'mot" a tester dans Y. 

Lecture du caractere de $19-1 A + Y, 

Est-ce un tiret ? 

Si oui , saut. 

Est-il egal a celui du mot ($6-7 4- Y) ? 
Non : il faut passer au mot suivant. 



Boucle si Y plus grand ou egal a Q. 
AFFICHACE 



£$00 
($06), Y 
£$80 
$FDED 

£$06 
$033C 
£$02 
$F94A 
$031 A | 



Affichage des 6 caracteres du mot 
puis envoi de 2 espaces. 



Et on passe au mot suivant eventuel, 
Retour au Basic. 



TREMPLIN MICRO 
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(fichier binaire) DOS , 3ouProDO s 

^^^^^H^BB (ProDOS conseille) 

Vous pouvez vous am user a saisir vos propres mots (a partir d'un dic- 
tionnaire des mots croises... ou de Scrabble). Vous pouvez aussi vous 
offrir la disquette TM (plus de 3000 mots), 

AdreSSG d'Origine I ,CI cest $2^0 (8192), mais c'est a vous de choisir. 

M§me constotion pour LOMEM. Dans notre DEMO, 

LOMEM vaul 28500, mais c'est une I i mite arbitraire. 

Fill d6 fichier Z Le fichier se termine par deux mots nuls (douze octets a 

dans le cas d'un fichier avec mots de 6 lettres). 



Saisie 



SAISIE 



1 . -> 
958 
** iffi 



:H = PEEK 



1 : GOTO 240 



100 TEXT : HOME : LOMEM : 28500 

110 PRINT CHR* (21 > 

120 PRINT "SAISIE DE MOTS POUR FICHIER BINAIRE" 

138 PRINT "— " 

140 POKE 34,3:v" = 6sL = 6 

150 N = 6:AD = 8192 - L 

168 N == N + 1 

178 vTAB V! PRINT "MOT ™N 
(36) + 1 - L: CALL - 

180 UTAB V: HTAB H: INPUT 

190 IF M* = THEN N ■ N 

29B IF LEN CHf) < > L THEN 180 

210 AD = AD + L: FOR I = AD TO AD 

sc ( mid* cm, I + 1 

S > 98 THEN AD = AD 
220 POKE I ,AS: NEXT I 
239 GOTO 168 

248 UTAB 22: PRINT "<1> TERMINE <2> ENCORE 
T R$ : PRINT R*: IF RS = 1 u THEN 168 

250 IF R* < > "2" THEN 240 

260 AD - AD * L: FOR 1 = AD TO AD + L * L : 
,0: NEXT :LF = AD + L + 5 - 8191 

278 PRINT 
L"LF 



- AD,1))! 

- L: GOTO 



+ L - 
IF AS 
180 



AS = A 
65 OR A 



GE 



POKE I 



CHR* <4'J"BSAUE M."; STR* CD J " ,A1>2000 , 



DA37 
A455 
7F62 
4225 
26A1 
F5C6 
7F65 

7A2B 
B7BE 
C9D7 
039E 



33B7 
3BC7 
3942 

27F5 
7893 

50D7 

A50E 



Cette petite routine est 
prevue pour saisir des 
mots de n'importe quelle 
longueur. II suffit de 
modifier la valeur de L 
(ligne 140). Si vous chan- 
gez I'adr^sse d'origine 
(ligne 15(1. AD) n'ou- 
bliez pas de remplacer 
le "AS2000 " de la ligne 
270 par la nouvelle 
valeur hexa. 

ERREUR : 

Aucune correction n'est prevue, 
Le droit o I'erreur n'existe pas ! 
II est facile d'ojouter quelques 
instructions pour se donner le 
temps de relire chacun des mots 
rentres au clavier. De plus, si 
vous constaler par la suite qu'un 
mol est errone, il vous sufrira de 
calculer son odresse, de taper un 
LOAD FICHIER. de poquer lo cor 
rection... puis de vous offrir un 
BSAVE du FICHIER rectifie. 



A propos de RECH6 et d'ANA6 : 

Des modifications mineures vous permettront d'utiliser ces deux routines pour des recher- 
ches avec des mots de 7, 8, 9, 10 lettres et plus. Si vous ne trouvez pas vous-meme la solu- 
tion, adressez-moi une enveloppe timbree et vous aurez rapidement la reponse. nestor. 
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DIDACTIQUE 



DOS 



ProDOS 



lean GOUTELLE 




TOUTES LETTRES 



OU LA BONNE ORTHOGRAPHE DES NOMBRES 

Orthographier convenablement les grands nombres... lorsqu'il faut les 
libeller en toutes lettres, n'est pas forcement de tout repos. Les caissiers de 
nos etablissements bancaires en savent quelque chose : que de vingt ou de 
cent gratifies d'un s.., ou prives de cette marque du pluriel, alors que celle- 
ci est indesirable... ou au contraire necessaire. 



LE PROGRAMME de J * Qn ^ou- 

TELLE saura 
rafrakhir voire memoire defaillante ou 
pallier voire ignorance. Ou vous repon- 
dez et il analyse votre reponse. puis vous 



donne son verdict, ou vous ne repondez 
pos et il vous fournit alors la solution du 
probleme pose. Attention ! quond vous 
ecrirez en toutes lettres, n'oubliez pas lo 
mention FRANC(S) ! 



LES CORRICE5 proposes sont, en principe, en accord avec le Dictionnaire 
aaummama * m * maaammmmmmmmm des difficuites de la fangue fran^aise des Editions Larousse. 



170 Ecriture du nom- 
bre (18 chiffres maxi- 
mum) a transposer. 



165 
110 
115 
126 
125 



REM 
REM 
REM 
REM 

REM 



***«****-**####**♦#♦** 
*L I BELLE D'UNE SOMME* 
* EN TOUTES LETTRES * 
********************* 



Ce programme traite les entiers posit ifs de 
8 a 999 999 B i 1 1 i ons 
130 DIN N$<120) ,C$(50> ,CP*C50> 

1 35 FOR ] = 6 TO 116: READ N*U): NEXT : FOR I = 1 

TO 38:T$ = T$ + "J': NEXT 
148 i 
143 
158 
155 
168 
165 
170 



REM ********************* 
REM * ENTREE D'UNE SOME * 
REM *ET TEST DE 'JALIDITE* 
REM ********************* 

TEXT i HOME : INVERSE : PRINT M CETTE SOMME , 



TOUTES LETTRES 
POKE 34,2 



S.U.P." : : NORMAL : PRINT 



88 3A 



4*BE 

8EFE 
683A 



803A 



3A61 



TREMPLIN MICRO 
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EN TOUTES LETTRES 



SUITE 



175 

186 
185 

196 

195 
260 
205 
216 
215 
226 
225 

230 

235 

240 
245 
250 

255 
260 
265 
276 

275 

286 

285 



FOR I = 1 TO 7iTNtCI) = :TR*(I> = "" : NEXT :S 
F* = U ":DE* = *": VTAB 2; HTAB 5: PRINT "Ecriye 
z un nombre en ch i ffres" : HTAB 10: PRINT " . 



295 
300 
3B5 
310 
315 
320 

325 
336 

335 



YTAB PEEK (37): HTAB 10: INPUT ;NC*: PRINT T 
*: IF NC* = " THEN 520 

L = LEN (NC*):NC = VAL <NC*) ; IF NC < > 6 TH 
EN FOR I - 1 TO LiLX* = LEFT* <NC*,1>: IF LX* 
= "0" THEN NC* = MID* CNCt,*>3 NEXT 
L = LEN (NC*>: FOR I = 1 TO L:LX* = MID* <NC* 
,1,1): IF LX* < "0" OR LX* > "9" THEN 170 
NEXT I 

REM ♦*****#**#*##*##*#****** 
REM *SEPARATION EN TRANCHES* 
REM ******##**##*#«***#*»*** 

NT = INT CL / 3)1 IF L < 3 THEN TN* < 1 ) = NC* ;T 
R ■ 1 : GOTO 255- 

FOR I = 1 TO NT:TN*(I) = MID* <NC*,L * 1 - I * 
3,3) : NEXT sTR =1-1 

IF L / 3 < > INT <L / 3> THEN TN*<I) = LEFT* 
CNC*,L -NT * 3) :TR = I 
IF TR > 6 THEN 170 

REM ********************** 
REM *ANAIYSE DES TRANCHES* 
REM ********************** 

FOR K = TR TO 1 STEP - 1 :TN* = TN*<K)i IF TN*< 
K) = "080" AND NC < > AND K < > 5 THEN 290 
CT = UAL ( LEFT* <TN*,1>):CD = UAL ( RIGHT* ( 
TN*,2>) : GOTO 535 

SF* = IF CT > 1 AND CD = AND K < > 2 AND 

K < > 6 THEN SF* = "S" 

TR*CK) = N*<100 + CT) + SF* + " 1 + N*CCD) + " 
" + N*U10 + K) : IF (K > 2 AND K < 6 AND VAL C 
TNS) > 1") OR <K = 5 AND UAL (TN*(6>) > 8) THEN 
TRS< K) = TR*<K) + "S" 
NEXT K 

REM ********************* 
REM *FORMAT SCI ENTI FI QUE* 
REM ********************* 

CIS = FOR I = 1 TO TR:CI* = MID* C 1 "" u * 

NC*,L +4-3*1,3)+""+ CI* : NEXT 
SF* " "" : IF NC > 1 THEN SF* = "S" 
KJTAB 3: CALL - 868: HTAB 14 - L / 2: PRINT CI* 
' ";: INVERSE ; PRINT ■ FRANC" + SF* : NORMAL 



53B0 
ADD9 

7BD2 

46DD 
9DCB 
003A 

003A 
0D0A 
8616 

3cce 

B6B4 
003A 

00 3A 
D08E 
88A8 

5C63 



9CF1 
Al CD 
003A 



B83A 

7E88 
3731 

756A 
003A 



180 Arret du pro- 
gramme sur un simple 
RETURN, 

185 Suppression des 
zeros en tete du nom- 
bre. 

190 Si le nombre ne 
contient pas que des 
chiffres, rejet. 

210 Tranches de 3 
chiffres. 

225 Cos d un nombre 
plus petit que 1000. 

235 La premiere tran- 
che, a gauche, ne con- 
tient pas 3 chiffres, 

240 S i I y a plus de 18 
chiffres, rejet. 

270 Analyse de gau- 
che a droite, 

280 Pluriel de cent. 

285 Traduction litte- 
rale, par tranches, 
complete© par un s, 
sauf pour MILLE. 

305 Pour plus de lisi- 
bilite du nombre en 
chiffres. 

320 Separation des 
tranches de 3 chiffres 
et formation dune 
chame. 

325 Pluriel de FRANC, 

330 Affichoge de la 
chaine en chiffres a 
transposes 
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360 Sur RETURN seul, 
pas de traduction pro- 
posee, Branchement 
direct au modele. 



370 Elimination des es- 
paces apres FRANC(S). 



375 Cheque "mot" de 
la chame est mis dans 
un tableau CP$( ). 
NR = NM, nombre de 
mots de la chame. 



405 Cos de nombre 
2 millions compor- 
fant six zeros ou plus. 



415 Reconstitution 
dune chame modele 
unique, formee avec 
les elements de la 
ligne 285. 



420 Cos d'une repon- 
se vide. Chaque mot 
de la choTne modele 
est transfere dans un 
tableau C$( ) par 
GOSUB 585. 



450 Cadrage adapte 
a la longueur de la 
chame. Si le nombre 
de mots n est pas le 
meme, FG = 1 , off i- 
chage sans analyse. 

455 Evite les coupu- 
res en fin de ligne. 

460 Afftchage direct 
du modele. 



470 Non identite des 
"mots" en INVERSE. 



480 Nombre de 
faute(s) et affichage si 
la chame reponse a le 
meme nombre de 
mots que le modele, 



348 

345 
356 
355 
366 



REM ***************** 
REM *CHAINE PR0P0SEE* 
REM ***************** 

VTAB 4s HTAB 6: PRINT "Ecrivez-Je en toutes let 
tres": MTAB 10 - L / 4: CALL - 958; INPUT "";C 
*:FG = 8: IF C$ = THEN FG = I : VTAB 12: HTAB 
8: FLASH : PRINT "LA REPONSE CORRECTE EST:": NO 
RMAL : PRINT : GOTO 399 



003A 



345 



370 



375 



VTAB 29: PRINT *D' accord C0/N) " ; : 
NT : IF R$ < > "0 a THEN 345 
C = LEN <C*>; IF RIGHTS (C$,1) = 
= LEFT* <C*,C - 1): GOTO 378 
VTAB 15: CALL - 958; FOR X = 1 TO 
HU : NEXT i HTAB 12; FLASH ; PRINT ' 
OURS"; NORMAL : GOSUB 585; FOR I = 
I) = C*<I): NEXT I:C* « " " sNR = NM 



GET R*: PRI 

" " THEN C* 

50:CP*<X) = 
ANALYSE EN C 
1 TO NM:CP*( 



UAL C RIGHT - * (NC* f 6>> = 8 AND TR 
> 8 THEN DE* = "DE ■ 

STEP - 1 :C* = C* + TR$(K) + H 



385 REM *************** 
398 REM *CHAINE MODELE* 
395 REM *************** 
400 ; 

405 DES = u " ; IF 

> 2 AND NC < 
415 FOR K = TR TO 

D : NEXT :C* = C* + DE* + "FRANC" + SF*:C = LEN 

<C*) 

420 GOSUB 585; IF FG THEN 455 
425 : 

438 REM *********************** 
435 REM ((ANALYSE DE CONFORM! TE* 

449 REM * ET AFFICHAGE * 
445 REM *********************** 

450 F = 0: UTAB 12; CALL - 958: PRINT T*: VTAB PE 
EK (37); HTAB 15: PRINT " Corrige ": VTAB 19 - 
C / 69: IF NR < > NM AND NOT FG THEN FLASH : 
PRINT " ERREUR D'ECRITURE 1 VERSION CORRECTE: ": 
NORMAL : CALL - 198:FG = 1 

455 FOR I = 1 TO NM:M* = LEFT* (C*CI> , LEN <C*<I>) 
-J); IF PEEK (36) + LEN CM*) > 39 THEN PRIN 
T 

460 IF FG THEN PRINT C*U);: GOTO 475 

465 P* = LEFT* <CP*<I>, LEN (CP*<I)) - l)i IF M* = 

P* THEN PRINT C*CI);: GOTO 475 
470 IMMERSE ! PRINT C*(I);: NORMAL :F = F + 1 
475 NEXT 2: PRINT sF* ■ i IF F > I THEN F* = "a" 
480 IF NOT F6 THEN POKE 35,24: VTAB 22: PRINT F" 

f&utt "F* 
485 : 

490 REM *************** 
495 REM *P0UR LA SUITE* 
580 REM *************** 
505 : 

(suite au verso) 



FFB3 
8E5D 
7A4A 



F9B0 
003A 



003A 
F8FF 



1613 
EA28 
003A 



D659 



5BE0 
0F79 

1454 
E034 
F339 

8B34 
003A 



003A 
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EN TOUTES LETTRES 



SUITE 



51 B POKE 35,24: VTAB 23: PRINT T$;: HTAB 6: VTAB 23 
: INUERSE : PRINT "ESP";: NORMAL : PRINT " : Aut 
re TEST j ou Fin: "ji INVERSE : PRINT "ESC" ; t NO 
RMAL : GET R$; IF R* = CHR* (32) THEN 159 
IF R$ < > CHR$ (27) THEN 495 
TEXT : HOME : END 
p 

REM ****************** 
REM *CAS PARTICULARS* 
REM ****************** 

IF NC = THEN TR*<1) = "ZERO" : GOTO 395 
IF (K ■ 2 OR K = 6) AND CD = 1 THEN CT m 8:CD = 
9: GOTO 280 : REM Cas des Mille et Mille Billion 
s 

IF K h TR AND L < > 3 * TR THEN CT = 8 : GOTO 2 
88: REM lere tranche incomplete 
IF NC = 100 THEN TR*<K) = "CENT": GOTO 385: REM 
Cent 

GOTO 288 

REM *********************** 

REM *DECOUPAGE DES C HAINES* 
REM *********************** 



515 
528 
525 
538 
535 
548 
545 
558 
555 



548 

565 

578 
575 
588 
585 
598 
595 
608 



FOR X 
l! FOF 



= 1 TO 58:C$<X) - "": NEXT X:NM =1:1 



R I = 1 TO C 
685 L$ = MID* tC$,.I».H. IF L* ) = 
HEN OR = 9:C$<NM) = C$(NM) 
AND L* = " * THEN 625 
AND L* = THEN C*(NM - 
1), LEN <C*CNM - 1)) - 1) 



618 
615 



628 

625 
638 
635 
648 
645 
650 
655 

668 

665 

678 
675 



"Z" T 
IF DR 
IF DR 
CNM - 
IF L* 
CNM) 
NEXT 



"A" AND Lf < = 
♦ L*: GOTO 625 

1) = LEFT* CD* 
+ L*: GOTO 625 
= " " OR L* = ■-" THEN DR = 1 :C*<NM) = C* 
+ L$:NM = NM + 1 



I: RETUF 



REM ********************* 
REM *EN TOUTES LETTRES..* 
REM ********************* 

DATA ,UN , DEUX ,TRQI S,QUATRE , CINQ , SIX , SEPT , HUIT 
,NEUF 

DATA DIX^ZE^OUZEJREIZE.GUATORZE.QUINZE.SEIZ 
E.DIX-SEPT.DIX-HUIT^IX-NEUF 

DATA VINGT,V1NGT ET UN ,VINGT-DEUX ,V INGT-TROI S ,V 
INST-QUATRE ,VINGT-CINQ , V1NGT-SIX ,YINGT-SEPT ,MIN 
GT-HUIT ,VINGT-NEUF 

DATA TRENTE ,TRENTE ET UN ,T RENTE -DEUX ,TRENTE-TRO 
IS JRENTE-QLKVTRE.TRENTE-CINQJRENTE-SIX.TRENTE- 
SEPT ,TRENTE-HUIT f TRENTE-NEUF 

DATA QUA RANT E , QUA RANT E ET UN, QUARANTE-DEUX , QUA 



ED7F 
9BCA 
5514 
883A 



883A 
F51F 



865A 

84A4 

8784 
2345 
883A 



883A 
E822 

866F 
F815 

E389 

D84C 
F5B6 
803A 



883A 
F452 
FE3B 

D39F 

3F83 



585 Notez que : 

1 La chaine propo- 
see, puis la chaine 

modele sont decou- 
pees en eliminant fes 
olancs et en terminant 
chaque "mot" par un 
blanc ou par un tiret, 

2 L'absence d'un ti- 
ret et/ou un tiret 

illegal dans la chaine 
propose© ne sont pas 
decomptes cornme 
une faute. 



NOTE Pi NESTOR 

Je vous conseille de 
creer une ligne : 

T26 TEXT : PRINT CHR$(21) 
: HOME 

car le programme lra« 
vaille en 40 colonnes. 
D'autre part, sous 
ProDOS, remplacez 
FLASH par INVERSE : 
c'est aussi joli et sans 
elfet sur I'affichage I 
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ATTENTION ! 

Ces lignes sont evi- 
demment tres impor- 
tantes. 

Vous controlerez 
facilement lo saisie 
de vos programmes 
(Basic e1 LAA) en vous 
offrant, une fois pour 
toute, la disquette 

SIGNATURE 

(voir noire bulletin 
de commande). 



RANTE-TROI S , QUARANTE-QUATRE , QUARANTE-CINQ ,QUARA 
NTE-S]X,QUARANTE-SEPT p QUARANTE-HUIT,QUARANTE-t4E 
UF BF39 

680 DATA C1NQUANTE ,CINQUANTE ET UN ,CINQUANTE-DEUX , C 
INQUANTE-TRQI S , C3NQUANTE-QUATRE , CINQUANTE-CINQ , 
CINQUAr^TE-SlX,CINQUANTE-SEPT,CINQUAT^E-HUIT,CIN 
QUANT E-NEUF 8FDF 

685 DATA SO ] XANTE , SOI XANTE ET UN , SOIXANTE-DEUX f SOIX 
ANTE-TROI S , SQIXANTE-QUATRE , SQIXANTE-CINQ , SOIXGN 
TE~3IX,S0rXANTE-SEPT,S0IXANTEHHUIT,S0IX^TE-NEU 
F 547D 

690 DATA SDIXANTE-DIX.SOIXANTE ET QNZE .SOIXANTE-DQU 
ZE , SOIXANTE-TREIZE T SOIXANTE-QUATORZE , SOIXANTE-Q 
UINZE,S0IXANTE-SEIZE,SOIXANTE-DIX-SEPT,SOIXANTE 
-DIX-HUIT,SOIXANTE-DIX-NEUF 4BD7 

695 DATA QUATRE-VINGTS , QUATRE-VINGT-UN, QUATRE-V1NGT 
-DEUX , QUATRE-U INGT-TROI S , Q HATRED] NGT-QUATRE , QU 
ATRE-U1NGT-CINQ f QLIATRE-VINGT-S1X ,QUATRE-YINGT-S 
EPT .QUATRE-VINGT-HUIT , QUATRE-VINGT-NEUF 9E3C 

799 DATA QUATRE-UINGT-DIX , QUATRE-UINGT-ONZE , QUATRE- 
^INGT-DOUZE , QUATRE-MINGT-TREI I E , QUATRE-VINGT-QU 
ATORZE , QUATRE-VINGT-QUINZE , QUATRE-VINGT-SEI ZE , Q 
UATRE-'v»INGT-DIX-SEPT f QUATRE-^INGT-DIX-HUIT , QUAT 
RE-VINGT-DIX-NEUF 3H3 

705 DATA "- f CeJT,DEUX CENT,TROIS CENT , QUATRE CENT,C 

INQ CENT , SIX CENT, SEPT CENT^UIT CENT ,NEUF CENT 2129" 

710 DATA "", ,MILLE t MJLLION, MILLIARD, BILLION, MILLE 6F28 



QUESTION : 



J'ai congu un programme graphique trop long pour se loger entre 
$800 et $3FFF, adresse apres laquelle commence HGR2... aussi 
est-ce un S.O.S. que je vous lance. 



REPONSE 



Protection 
deHCR 

OU HGR2 



Attention i 
supprimer le LOMEAA 
eventuel du pro- 
gramme concerne... 



II faut LOADer votre programme au-dessus de la 
page que vous desirez proteger. Pour cela, tapez : 

• HGR POKE 103,1 : POKE 104,64: POKE 16384,0 

• HGR2 POKE 103,1 : POKE 104,96: POKE 24576,0 

Ensuite, LOAD PROGRAMME ou RUN PROGRAMME (celui-ci est 
rnaintenant instafle a sa nouvelle adresse). 

Vous pouvez automatiser la chose par quelques lignes du type : 

Q IF (PEEK (103) + PEEK (104) * 256) = 2049 THEN POKE 103,1: 

POKE 104,96: POKE 24576,0: PRINT CHR$(4) "RUN PRO" 
10 TEXT: HOME 

20 PRINT PEEK (105) + PEEK (106) * 256 

N'oubliez pas qu'il est possible d'utiliser la pseudo page 3 (voir la 
collection de Trempiin Micro). 
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Votre bibliotheque 

INFORMATIQUE 



• MATHEMATIQUE 
ET INFORMATIQUE 
(Cedk /Nathan) 

Est-i! maintenant I'heure de penser (r)evolu- 
tion de notre enseignement qui donnerait la 
prioriie aux processus algorithmiques et, h 
trovers eux, a une mathematique plus 
active plus vecue : foire des mathemafi- 
ques et non en contempler ? C'est la ques- 
tion que pose l introductiori de ce livre. Une 
question a laquelle neuf chapitres apportent 
ensuite une multitude de reponses. 

Si vous aimez les mathematiques et pouvez 
pretendre a un niveau «terminale» ou an- 
dessus. il est certain que cet ouvrage 
d'Arthur Engel, adapte par Doniel Reisz, 
fera voire bonheur. 

De nombreux exposes, clairement develop- 
pes, des exemples et des exercices judicieu- 
sement choisis... brel, une bonne methode 
de formation, ossociant mathematiques et 
informal ique I 



MATHEMATIQUE 
ET INFORMATIQUE 




• DICTIONNAIRE CEGOS 
(Cedic/Nathan) 

Titre de ce volume : Definitions du vocabu- 
loire micro-informatique et micro-elect rique 
avec lexique Anglais-Francois. Auteur : 
Chrisliane Morvan- Destination : grand 
public. 

Le nombre de mots est relotivement limite, 



mais les notices claires et souvent concises. 
Le lexique rendra service a celles eJ a ceux 
qui ne pratiquent pos I'anglais. 




dcfwibom 4u 

enter* * •Hirorrrtaticfue 
ct 

micro dectronique 

kjiiciiic An^dU-frdTKaJl 



CtttetMonn 



CMttCfrialhan 



• DICTIONNAIRE MUL TIPLAN 
(Cedic/Nathan) 

Ce dictionnaire apparfient 6 une nouvelle 
collection references croisees a progression 
logique, creee aux Etafs-Unis pour Microsoft 
Press par Eddie Adamis. 
Normalement, ovec de Jels ouvrages, un uti- 
lisateur doit etre en mesure de irouver la 
reponse a une question... et cela quelle que 
soil son experience. Conception revolution- 
naire ? Pos vraiment, mais neanmoins inte- 



Wlultipte!! 
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ressante. En fait, chaque dictionnaire tom- 
prend six types d'entrees, toutes classees 
par ordre alphabetique : cornmondes, fonc- 
f ions . operateurs, valeurs d'erreur. cours 
d'initiotion et tables. Trois repertoires et un 
index facilitent encore les recnerches. 
Si vous etes Iheureux possesseur d un Moc 
et si vous rencontrez des difficultes lors de 
I 'utilisation de MuHiplan, plocez ce diction- 
naire a proximite de votre machine, II com- 
pletera ovec bonheur votre actuelle 
documentation. 

• DICTIONNAIRE 
DE L INFORM A TIQUE 
(Revue Fiduciaire) 

Cet ouvrage, realise par toute une equtpe, 
sous la direction de Yves-Robert de La Ville- 
guerin, a ete conc.u pour etre un ouvrage de 
tderrain», envisageant les problemes tech- 
niques sous un angle concret. C'est en tout 
cas ce que pretendent les deux premieres 
pages de presentation. 

Et alors ? Vous vous attendez au pire ? Vous 
avez tort : le bouquin tient ses promesses. 
meme si ses 185 pages ne sanl pas donnees 
(185 F)... mais elles en valent bien 300 
moins copieuses ! 

Pour chaque mol : le terme anglais corres- 
pondent, une definition (bien redigee), un 
developpement, des conseils et des referee 
ces, La Revue fiduciaire, coeditrice de ce 
didionnoire n'oura certes pas a en rougir. 



dictionnaire 
de 

Pinformatique 

■ :'t"i.t.,il Hi" bllM'rIUtlQUC 
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GUY-HACHETTE 



UTILITAIRE IT 



ProDOS 



NESTOR 



DECALAGE 



Montre bien la rapidite 
du langage machine. 



Le premier element d'une liste devient le dernier tandis 
que tous les autres elements sont egalement decales. 



SYNTAXE : call 768 ( n,var$(g)... 

expression dons la- 
quelle N est egal au nombre reel d'ele- 
ments MOINS UN (autrement dit, on ne 
1ient pas compte de la valeur 0, bien 
que celle-ci soit utilisee). 
VAR$ doit etre remplace par le nom de 
la variable choisie. 



REMARQUE : " est evidemment pos- 
sible, apres avoir saisi 
2Q mots de dormer une valeur inferieure a 
N (10, par exemple}. Dans ce cas, 
VAR$(0) est transfers dans VAR${10) et 
tous les contenus intermediates sont 
decales. Par centre, de VAR$(11) a 
VAR${19), la liste n'est pas modifiee. 



DECALAGE 

10 TEXT : HOME ! PRINT CHRs <4VPR£3": GOSUB 90 F649 
20 DIM M$<400> 

30 FOR 1 = TO 25: FOR J = 1 TO 5:Mt(I) = M$(I> + CHRs (65 + I): NEXT 

« NEXT 4^02 
35 N= I :L = (N/2) - 1 : CALL - 198:N ■ N - is GOTO 45 

40 CALL 768.N.M$(0) 86C9 
45 HOME : FOR I = TO L: POKE 1403.0: PRINT I" U :MS(I):: POKE 1403.15: 

PRINT 1 + I + L u ":M$<1 + L + I): NEXT D8EB 
50 CALL 768,N,MS(0) 86C9 
55 VTAB It FOR I = TO L: POKE 1403.40: PRINT I" "sMSCDst POKE 1403.5 

5: PRINT 1 + I 4 L" "sM»<l + L + I>: NEXT 515F 
60 VTAB 22: CALL - 198: PRINT H PRESSE2 UNE TOUCHE (T POUR TERMINER) ": 

: GET R$: PRINT : IF R$ < > "T" THEN 40 Q3B6 
65 VTAB 22: PRINT "<]> ENCORE <2> MENU DE DISOUETTE <3> TERMINE GET 

R$: PRINT 4825 
70 IF R$ = "1" THEN 40 0390 
75 IF R$ = "2" THEN PRINT CHR$ (4) "RUN MENU . Dl " 5C82 
80 IF RS < > "3" THEN 65 2969 
85 HOME : END 

90 FOR I = 768 TO 851: READ R: POKE I.R: NEXT ! RETURN 8F12 

95 DATA 32.190.222.32,123.221 .32,82,231 ,32,190,222.32,227,223.133,6.132 
.7,160.2.177.6.153.249.0.136,16,248.198.80.165.80.201 .255.208.6. 198, 
81.201,255.240.30 2CF0 

96 DATA 165.131 .24. 1 05. 3. 133. 131 . 144, 2,230 . 132, 160 . 2. 177. 131 . 145. 6. 136, 
16.249,165.131.133.6.165.132,133.7,208.212.160.2.185.249.0,145,6.136 
,16.248.96 Q393 
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TRANSMISSION DE5 PARAMETRES 



300 : 


20 


BE 


DE 


JSR 


$DEBE 


303 : 


20 


7B 


DD 


J5R 


$DD7B 


306 : 


20 


52 


E7 


JSR 


$E752 


309 : 


20 


BE 


DE 


JSR 


$DEBE 


30C: 


20 


E3 


DF 


JSR 


$DFE3 


30F : 


85 


06 




STA 


$06 


311 : 


84 


07 




STY 


$07 



336 
338 
33A 
33C 
33D 



34B : 
34E : 

350 : 

351 : 
353 : 



CHKCOM tesle la presence de la virgule. 
FRMEVL lvalue l expression et la met dans FAC. 
GETADR converts alors FAC en valeur entiere 
(la valeur de N est dans $50-51 ), 
CHKCOM teste la deuxieme virgule et 
PTRGET recherche la variable par son nom. 

A et Y contiennent la bonne adresse et nous la sauvons 
LI dans $6-7 (par exemple). 

ELEMENT O EN ATTENTE — 



313 : 


AO 


02 


LDY 


£$02 




Registre Y mis a 2 pour lecture 


315 : 


B1 


06 


r LDA 


($06) ,Y 




et memorisation des 3 octets contenant 


317 : 


99 


F9 00 


STA 


$00F9,Y 




les parametres de I'element : 


31A : 


88 




DEY 






Longueur (1 octet) et adresse (2 octets). 


31B : 


10 


F8 


_ BPL 


$0315 




La boucle fonctionne pour Y = 2, 1 et 0. 



COMPTEUR DU NO MB RE DELEMENTS A TRA ITER 



31D 


C6 


50 


31F 


A5 


50 


321 


C9 


FF 


323 


DO 


06 


325 


C6 


51 


327 


C9 


FF 


329 


FG 


1 E 


32B 


A5 


83 


32D 


18 




32E 


69 


03 


330 


85 


83 


332 


90 


02 


334 


E6 


84 



DEC $50 

LDA $50 

CMP £$FF 

BNE S032B 

DEC $51 

CMP £$FF 



BfcQ SG349 



Nous retrouvons le nombre d'eiements 

dans $50-51 (lire plus haut). II convient 

de decrementer le compteur. Les decalages 

se poursuivront aussi longtemps que $50-51 

n'auront pas pris la valeur $FF, 

d'ou les tests effectues ici. 

C'est termine ? En route vers la 'fin ! 



- ADRESSE DE L EL 

LDA $83 
CLC 

ADC £$03 

STA $83 

BCC $0336 

INC $84 



:MENT A DECALER 



Chaque nouvelle adresse est egale a I'ancienne 
PLUS 3 (au depart, a la sortie de PTRGET. 
$83-84 contiennent aussi I'adresse 0... 
et c'est pourquoi nous la retrouvons ici... 
le hosard n'y etant pour rien ! ). 
U On incremente quand il y a une retenue. 

DEC A LACE 



AO 02 

B I 83 

91 06 
88 

10 F9 



LDY £$02 
LDA ($83), Y 
STA ($06), Y 



Registre Y mis a 2 pour lire le contenu 
des 3 adresses de I'element a decaler 
et les mettre a la place de celles 
du precedent. Boucle classique en morche 
arriere et ovec BPL comme retroviseur ! 



DEY 

BPL $0338 

PREPARATION DU DEC A LACE SUIVANT 



33F : 


A5 


83 


LDA 


$83 


341 : 


85 


06 


STA 


$06 


343: 


A5 


84 


LDA 


$84 


345: 


85 


07 


STA 


$07 


347: 


DO 


D4 • 


BNE 


5031 D 



Sauvegarde, dans $6-7 r des adresses 
contenues dans $83-84. 



OU LI 

AO 02 
B9 F9 00 
91 06 
88 

10 F8 
60 



Et on report pour un nouveau decalage. 
NUMERQ O SE RETROUVE LE DERNIER (OU LE N> 



LDY £$02 

LDA $00F9,Y 

STA ($06), Y 
DEY 

BPL $034B 
RTS 



Toujours le meme processus 

pour recuperer les parametres de I'element 

zero et les mettre d la place de ceux 

de I'element N (souvenez-vous : N va de 1 a N, 

bien que le numero comptej . 

ET COMME IL FAUT BIEN UNE FIN... 



■■■■■HMilliinHi 

32 



IHMMI 
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INITIATION 



CEO 



CATALOGUE SPECIAL 



nilCCTIflM Commen * — en langage machine bien sur ! — atficher une ligne verticale de 
IfUCdllUll texte sur route la hauteur d'un ecran, en 40 colonnes, en HTAB40, puis la pro- 
mi^^b feger pendant que Ton affiche le catalogue... tout cela sans voir le curseur ? 



CAT 
DEMO 



Essoyez eette 
petite routine 
(qui ne 
demande 
evidemment 
qua etre 
completee ou 
modifiee). Elle 
peut etre 
appelee a 
parlir d'un 
programme 
Basic, com me 
dans noire 
exemple. 



15 
28 
25 

38 
35 

46 

45 
58 
55 

60 
65 
70 



75 



TEXT : HOME : PRINT CHR* (21): PRINT CHR$ ■:4>"BL0AD CAT" 
ONERR GOTO 25 
CALL 768: GOTO 35 

TEXT : HOME : PRINT "METTRE UNE DISQUETTE DANS LE DRIVE 1 



<T>ERMINEct6 



CHR$ (4) "RUN MENU , Dl 1 



CALL 797: POKE 216,8: GOTO 15 
VTAB 24: PRINT "<E>NC0RE <M>ENU DE DISQUETTE 
: GET R*i VTAB 22: PRINT 
IF R* = H E" THEN RUN 15 
IF R* = "M u THEN PRINT 
IF Rt < > l1 T" THEN 35 
HOME : END 

REM PROGRAMME LM EN DATA 
FOR I = 768 TO 834: READ Rs POKE I s Rs 
DATA 32 , 83 , 252 , 1 60 , 3? , 1 62 , 23 , 1 34 , 37 » 1 
9,43,3,143,48.202,14,249,136,132,33,32,119,165,44,8, 192,16,2 
51 ,44,16,192 ,32,57,251 ,76,88,252 

DATA 212,210,197,285,288,294,201 ,296,168,285,281 ,195,210,287 
,160,206,213,285,197,218,287,160 ,49,49 



NEXT 

8,32,193,251 ,166,37,18 



6BE7 
89B7 
D67E 

FF3E 
0B66 

B773 
7452 
259D 
F187 
3E51 

8E28 



AADA 
6F58 



HOME pour effacer une premiere fois, 

Y ne sera pas detruit par BASCALC (longueur de ligne). 

Numero de ligne. 

X passe dans A pour que BASCALC mette en $28-29 I'adresse 
de la ligne de numero X, 
On recupere X dans $25. 

Lecture et affichage d un caractere de rang $32B + Xen $28-29 + Y. 
X = X — 1. 

Quand on oura X — $FF, on n'ira plus a $307. 

Y = Y — 1 ($26) 
et cela vaut un POKE 33,39. 
ROUTINE CATALOG DU DOS 3.3. 

Attente d une touche et remise d zero du clavier. 

Mode TEXT. 
Effacement final. 

32B : D4 D2 C5 CD DO CC C9 CE AO CD C9 C3 D2 CF AO CE D5 CD C5 D2 CF AO 31 3 1 TREMPLIN MICRO NUMERO Q □ Text* ASCII 



300 


20 


58 


FC 


JSR 


$FC58 


303 


AO 


27 




LDY 


£$27 


305 


A2 


17 




LDX 


£$17 


307 




"~ 86 


25 




STX 


$25 


309 




8A 






TXA 




30A 




20 


CI 


FB 


JSR 


$FBC1 


30 D 




A6 


25 




LDX 


$25 


30 F 




BD 


2B 


03 


LDA 


$032B.X 


312 




91 


28 




STA 


{$28) ,Y 


314 




CA 






DEX 


315 




_10 


F0 




BPL 


$0307 | 


317 


88 






DEY 




318 


84 


21 




STY 


$21 


31A 


20 


6E 


A5 


JSR 


SA56E 


31 D 


2C 


00 


CO 


BIT 


SCOOO 


320 


10 


FB 




BPL 


$03 ID 


322 


2C 


10 


CO 


BIT 


$C010 


325 


20 


39 


FB 


JSR 


$FB39 


328 


4C 


58 


FC 


JMP 


$FC58 



i 
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Votre bibliotheque 
INFORMATIQUE 



• LA ROM DE L APPLE Ik 
(Sybex - Marcel Cottini) 

L'objedif de cet ouvrage esl de fournir au 
lecteur tous les moyens pour acquerir une 
maitrise lolole de son Apple lie. II troite les 
nombreux points qui le differencient des 
modeles precedents. Les pnncipes de base 
et le Basic Applesoft sont supposes connus. 

Les points suivants sont trails : 

— la compatibility des programmes, 

— la ploce du lie dans la gamme Apple //, 

— les nouveoux moyens de prograrnmation 
mis a lo disposition de I'utilisateur, 

— la place qu'occupe le nouveau systeme 
d'exploitation ProOOS dans I'environne- 
ment Apple, 

— les differences fondomentales dans la 
ROM AppleSoft ovec les modeles Apple 
anterieurs. 

Ce livre est le prolongement de I'ouvrage LA 
ROM DE 1' APPLE II ecrit por le meme 
auteur. II sadresse 6 toutes les personnes 
desireuses de perseverer dans ie domoine 
de la prograrnmation et qui, en plus du Ion- 
goge Basic qu'elles savent deja pratiquer. 
voudraient se familiariser avec ce type de 
«machine». 

Trois volets sont consacres d I'Apple lie 
T. L Apple tic, dernier micrO'Ordinateur de 
la gamme Apple //, possede de norn- 
breuses ameliorations, ton! dans le 
domoine technique, que dans la pro- 
grarnmation. Toute sa structure est pas- 
see en revue avec, entre autres, le 
microprocesseur 65C02, piece maitresse, 
la RAM, Ja ROM,, les nouveaux circuits 
speciolement connus et odaptes pour ce 
type de micro-ordinateur, etc. 

2. Le nouveau systeme d'exploitation Pro- 
DOS (Professional Disk Operoting 
System), est largement troite et com- 
ments. Concu ou deport pour la gestion 
d'un disque dur du type <«profilei>, il fut 
odapte par la suite pour la serie des 
Apple //. II est fourni gratuitement de- 
puis la commercialisation de I'Apple lie, 

3. La ROM AppleSoft, largement commen- 
ted dans une edition precedenfe, est lis- 
fee au niveau des instructions diffeVentes 
de la version onlerieure [Apple II a He). 
Certaines routines son! nouvelles, 
d'autres ont ele modifiees ou suppri- 
mees. Un chapitre a ne pas negliger. 
devenant une necessite pour ceux qui 
programment en langage machine. Tous 



les details sont fournis pour une meil- 
leure comprehension de certains meca- 
nismes de compatibility. 
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PROGRAMMEUR 


PL, 




< 


j 



• DOS 3.3 GUIDE DU 
PROGRAMMEUR 
(Sybex -Marcel Cottini) 

Ce livre n'a pas pour objet de plagier le 
Manuel du DOS, document livre 1 avec 
I'achat d'un ensemble Apple // et lecteur 
de dtsquettes, mais se veut d'une voca- 
tion beaucoup plus technique. 
II n'est pos question pour I'auteur de ree- 
crire le Manuel du DOS edite* por Apple 
Computer, d'oilleurs tres bien con;u pour 
le demarrage d'une configuration stan- 
dard. L'idee recherchee par cet ouvrage 
est d'apporter toute I'aide necessoire au 
debutant qui voudrait en connaitre un 
peu plus sur les mecanismes du fonction- 
nement interne des routines du DOS, 
Beaucoup de choses ont ete dites et ecri- 
tes sur les systemes d'exploitation, en 
particulier le DOS 3.3, derniere version 
de cette $6rie. Dans un passe plus recent, 
la sortie sur le marche de ProDOS o consi- 
deroblement change la part du marche 
offert aux systemes d'exploitation. Ce 
nouveau SED permet entre autres, une 
rapid ite accrue de lo gestion des fichiers 
ainsi qu'un traitement de fichiers d'une 
to ill e plus importante (toille maximale : 
16 megabytes). Por oilleurs. il peut traiter 
des peripheriques de souvegarde d'une 
capacile de 32 megabytes, disque dur du 
type profile par exemple. 



par Clement RENARD 



Mais alors, pourquoi acheter un livre sur 
le DOS 3.3 ? Pour une raison bien sim- 
ple : tout n'a certoinement pas ete dit sur 
ce systeme.,. et cet ouvrage le prouve ! 
Beaucoup de programmeurs chevronnes 
ont acquis une experience et une ma?- 
(rise toute particuliere dans la pratique 
de 1'ordinateur. en particulier la serie des 
Apple It. Mais bon nombre ont jalouse- 
ment garde le fruit de leurs decouvertes 
et beaucoup d'ostuces sont restees 
cachees a ce jour. 

L'outeur, passionne inconditionnel de 
I'Apple //, possede une grande expe- 
rience dons la pratique et la technique de 
(utilisation du DOS 3.3. Desireux d'en 
faire beneficier le maximum damateurs 
de lo pomme, le projet dun ouvrage des- 
tine aux lecteurs ayant des notions de 
base en prograrnmation prit corps. Le 
resuitat se concretise par la redaction 
d'un monuscrit traitont lo protique du 
DOS 3.3 sur Apple H. 

A qui s'adresse ce livre ? A tous ceux qui 
desirent alter de l evant dans Tinformati- 
que grand public, car il ne faut pas 
oublier que les amoteurs d'aujourd'hui 
sont les professionnels de demain. Rien 
ne se cree tout seul, Pour chaque decou- 
verte et mise ou point, il faut cette impul- 
sion qui fait emerger I'inconnu d*hier. 
DOS 3.3, guide du pragrammeur est 
I'ingr&Jient qui permettra a bon nombre 
de debutants en prograrnmation, de faire 
surface et de decouvrir le cote cache de 
son Apple. 
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GUY-HACHETTE 



UTILITAIRE 



DOS 



ProDOS 



Maurice CHAVELLI 



S1MPLIFIEZ 

la saisie avec 



CLOSSAIRE 



P0URQU 01 CE PROGRAMME ? 



Combien de fois tapez-vous LIST, INPUT, HOME, CATALOG et autres CALL — 151 
sur votre clavier ? Le present programme va vous permettre d'economiser vos 
forces, li permet de creer un glossaire pouvant conlenir jusqu'a 64 definitions, 
Une definition est composee d'un coractere d'appel et d'une serie limitee a 255 
carocteres. L'utilisation du glossaire est simple : I'action conjuguee de la "pomme 
ouverte" et du caractere d'appel entratne la prise en compte de la serie de carac- 
teres correspondante comme si elle etait entree au clavier. 



OUILOUES PRECISIONS UTILES 

Attention ! Cheque definition est vali- 
dee par la touche ESC„ et les carocteres 
sont pris en compte JU5QU AU CURSEUR 
seulement. Le programme aceepte les 
carocteres de controle, en particulier le 
celebre CTRL-M (RETURN). Vous pouvez 
ainsi prevoir plusieurs commandes dans 
une definition, et notamment : 



HOME 
CATALOG 



CTRL-M 
CTRL-M 



Le programme vous permet une gestion 
complete : le glossaire cree est sauve- 
garde sous forme de f ichier binaire. 

L'UTILISATION 

Pour utiliser un glossaire il vous suffit 
d'un simple BRUN ; 

— le glossaire est alors charge proviso!- 
rement en $2000 {adieu la page 1 
HGR !) ; 

— une interface est casee en $300 (done 
attention a la page 3) ; 

— DOS ou ProDOS est modifie ; 

— le bloc de traitement et les definitions 
sont stocked en memoire auxiliaire a 
I'adresse $4000 ; done attention a la 
commande /RAM de ProDOS ! Je 



n'ai pas juge utile d'interdire les 
Blocks correspondents : $19 et sui- 
vants. Si quelqu'un est tente, la table 
d'occupation des Blocks (Volume 
Bit-Map pour les inities) est en $C00 
de la memoire auxiliaire. Chaque 
bloc libre est represents par un bit 
qui est d 1 (0 quand il est occupe). 

LA ROUTINE EN 
LANCACE MACHINE 

Elle figure sous forme de DATA dans le 
programme BASIC. Une version source 
(ProCODE) commentee vous aidera a y 
voir plus clair... 
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1 

2 
3 
4 

5 
6 



1 8 

11 
12 
13 
14 
15 
16 
17 
18 
19 
28 
21 
22 



24 
25 
26 
27 
28 
29 



31 

32 
33 
34 
35 
36 

37 



DATA "(Oharger" , 1 (S)auver" , u <N>oui;eau" <A>j outer" / <E) f facer" , M < 
L) ister " , " <G)u i t ter " 949A 
FOR C = 1 TO 7; READ At: NEXT 8 7*F 

REM — 

REM Routine Assembleur 
REM 

DATA 169,0,133,68,169,33,133,61 ,169, 0,1 33, 62, 16?, 8, 133, 63, 169, 8, 13 

3, 66 ,169 ,64, 133, 67.54, 32 ,17, 195, 162, 33 ,189,68,32, 157,8 ,3,282,16,24 

7 , 1 69 , 255 , 1 33 , 24 , 1 73 , 289 , 3 , 248 , 1 1 1 C65 

DATA 169,8, 141 ,85,178,169,3,141 ,84,179 ,96,141 ,281 ,154,149,3,141,28 

2 , 1 54 , 94 , 36 , 24 , 1 6 , 24 , 32 , 27 , 253 , 44 , 97 , 1 92 , 43 , 1 , 96 , 1 68 , 9 , 1 40 , 237 , 3 , 1 

68 , 64 , 1 48 , 238 , 3 , 56 , 1 84 , 74 , 28 , 1 95 , 1 60 , 45 , 29 8 , 239 3E 1 C 

DATA 148,9,132,7,133,249,185,0,65,197,249,248,18,288,208,208,208,2 

88,243, 165,249,288,37,169,8, 133,24 ,20 , 1 85 ,8 , 65, 1 33 , 258 , 288 

DATA 185,8,45, 133,8,280,185,0,65,133,9,144,7, 177,8,280 ,132,7,194,2 

50,288,4,160,255,132,24,160,12,140,237,3 5 168,3,148,238,3,24,184,76 

,20,195 AE4B 

FOR C = 8192- TO 8291: READ A7.: POKE C,A7.: NEXT : FOR C = 8448 TO 8 

522! READ A%l POKE C r AftJ NEXT 2?3B 

REM 

REM Debut Programme 
REM 

LOMEM: 24574:0 = 8784: GOSUB 120 4E55 
ONERR GOTO 136 7CEA 
HOME : PRINT 5A8B 
HTAB 10; PRINT "Gestion de glossaire" 0CBA 

HTAB 39: PRINT " " FCB3 

PRINT : PRINT 1 5AE 

RESTORE : FOR C = 1 TO 7: READ A"*: HTAB 15: PRINT AS: PRINT : NEXT A4IA 
PRINT : HTAB 18: PRINT "<ESP> => Catalogue" C2D5 
WAIT - 16334,128: GET AS 61A8 
IF AS = *N" THEN PRINT : PRINT "Confirmation nouveau giassaire? ■ 
;: GET AS: IF A* = "0" THEN GOSUB 120: GOTO 37 FCBB 
IF AS ■ "A" THEN 36 2E94 
IF AS = " E" THEN 66 3D9B 
IF AS - "L" THEN 87 2CA5 
IF AS = "C" THEN 183 9DC1 
IF AS = N S" THEN 113 31 D2 

IF AS = " " THEN PRINT : HOME : PRINT CHRS <4)"CAT" : WAIT - 163 
84,128: GET AS: GOTO 16 F83F 
IF AS = *GT THEN PRINT : PRINT "Confirmation Quitter? ";: GET AS: 
IF AS = "0" THEN HOME : END 92BF 
CALL - 198: GOTO 16 9843 

REM 

REM Trai tement AJOUTER 
REM 

N = N + 1 7F65 
IF N > 64 THEN HOME : FLASH : UTAB 16; HTAB 12: PRINT "PLUS DE PL 
ACE'" : GOTO 136 C722 
HOME : PRINT "; 43E2 
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38 INVERSE : PRINT ■ " 5 ; HTAB 46: PRINT " 54F8 
3? PRINT " ';: NORMAL : PRINT " Numero: " ;N;: HTAB 28: PRINT "Memoir 

e: ,r ;M - + 256;: HTAB 40: INVERSE : PRINT * "j B6B9 

48 PRINT ■ NORMAL : PRINT u 

INVERSE : PRINT " ": NORMAL 5EC4 

41 VTAB 18: PRINT "Touche yti1is*e? " ) : GET A*: IF ASC (A*) = 27 THE 

N 16 959B 

42 FOR C = TO + 252 STEP 4 884F 

43 IF PEEK (C> = ASC <A*) + 128 THEN CALL - 1°8: PRINT "Deja ut 1 1 
is*«! B ! FOR C = 1 TO 1000: NEXT : GOTO 37 7895 

44 IF PEEK CO = THEN 46 B351 

45 NEXT 8582 

46 IF ASC (At) < 27 THEN INVERSE : PRINT CHR* ( ASC <A$) + 64);: N 
ORMAL : GOTO 48 3042 

47 PRINT A* Dl IF 

48 POKE + CN - i) * 4 ♦ 3, INT <M / 256) ♦ 31: POKE ♦ (N - 1) * 4 

+ 2,M - 256 * < INT <M / 256) > 7991 

49 POKE + (N - 1) * 4, ASC <A$) + 128: PRINT : PRINT : PRINT "Texte 

? " ; 4DF6 

58 X - « F358 

51 GET A$ 

52 IF ASC CA*> = 27 AND X = 8 THEN GOTO 16 BE7D 

53 IF ASC (At) = 27 THEN POKE + (N - 1 ) * 4 + t,XlM = M + Xl GOTO 

35 • A73B 

54 IF ASC CA*> = 8 THEN 68 5D7B 

55 IF ASC <A*> = 21 THEN 62 F2A8 

56 POKE M + X, ASC (AS) + 128: IF ASC CA*> < 27 THEN INVERSE : PRIN 

T CHRS C ASC (A*) + 64>J1 NORMAL : GOTO 58 29CE 

57 PRINT A*; A75A 

58 X - X + 1 : IF X < 256 THEN 51 6F5»3 

59 CALL - 198 OAF 7 
66 CALL - 1008;X ■ X - 1: IF X > =0 THEN 51 4E6A 

61 CALL - 198 DAF7 

62 CALL - 1036: GOTO 58 BF71 

63 REM 

64 REM Trai ttffttftl EFFACER 

65 REM 

66 HOME : HTAB 8: PRINT 'Effacement de definition" 5480 

67 HTAB 8: PRINT " ■ " 243E 

68 PRINT : PRINT : PRINT "Lettre clef? ":: GET A* 30E7 

69 IF ASC <AS) = 27 THEN 16 89AD 

70 FOR C = TO + 252 STEP 4 804F 

71 IF PEEK <C) = ASC (A*) + 128 THEN PRINT : PRINT : GOTO 73 D4B3 

72 NEXT : CALL - 198: PRINT " In trouvabl e 1 11 ; FOR C = 1 TO 1088: NEXT 

: GOTO 66 5DE5 

73 GOSUB 124: PRINT : PRINT FB2F 

74 PRINT "On efface? ";: GET A*: IF A* < > "O" THEN 66 7AFB 

75 VTAB 16: HTAB 11: FLASH : PRINT "UN PEU DE PATIENCE'": NORMAL 

76 L = PEEK <C + 1) 6C8B 

77 FOR D = AD TO M - L: POKE D, PEEK CD ♦ L3 : NEXT 08E7 

78 M = M - LsN = N - 1 801F 

79 I = <N - <C - 0) / 4 - 2) * 4: IF I = - 4 THEN D = C: GOTO 83 
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86 FOR = C TO C # I STEP 4 22E8 

81 AD = PEEK CO + 6) + PEEK CD + 7) * 256:AD = AD - L: POKE D + 3, 
INT (AD / 256): POKE D + 2, AD - PEEK CD 4 3) * 256: POKE D + 1. P 

EEK CD + 5): POKE D , PEEK CD + 4» 3531 

82 NEXT D 87C6 

83 POKE D,8: GOTO 66 5AAA 

84 REM 

35 REM Trai tement LISTER 
86 REM 

8? HOME \Z = 8 EE2B 
38 FOR C = TO + 252 STEP 4 884F 
8? IF PEEK <C> < > THEN 91 7921 

90 PRINT : PRINT "RETOUR MENU ( >*p HTAB 14: GET A*: GOTO 16 F5D2 

91 IF PEEK < - 16384) < 128 THEN 94 7F4C 

92 GET A*: IF ASC CA*> = 27 THEN 16 F10A 

93 If A$ = " " THEN Z = 1 EC65 

94 IF Z = 8 THEN 98 AF3C 

95 WAIT - 16384,128 EC48 

96 GET A*: IF ASC CA$) = 27 THEN 16 F18A 

97 IF ASC CA*> = 13 THEN 2=8 F69B 

98 GOSUB 124 0F47 

99 NEXT C: GOTO 90 EDI 3 
196 REM 

181 REM Tr a i ternent CHARGER 

182 REM 

103 PRINT : INPUT "CHARGER => Quel nom? " ;A$ 53B3 

184 PRINT CHR* ( 4) " B LOA D u J A* ; ' , A*2080 * C33E 

185 N = 1 3D4F 

186 FOR C = TO + 255 STEP 4: IF PEEK CO = THEN 168 596C 
107 N = N * 1 : NEXT 7B21 

188 M = PEEK it - 2) ♦ < PEEK <C - 1> - 31) * 256 + PEEK <C - 3) 

189 GOTO 16 4812 
118 REM 

1 1 1 REM Trait erne n t SAU'JER 

112 REM 

113 POKE 8285, INT CM / 256): POKE 8281, M - 256 * PEEK ^3265) 83F6 

114 PRINT : INPUT "SALTER => Quel nom? " ;Ai 7E8P 

115 PRINT CHR* <4)*BSAVE" ;A*;" ,A*2908,L" ;M -0 + 512 0BC5 

116 GOTO 16 4812 

117 REM 

118 REM Initial > sat i ons 

119 REM 



128 FOR C = TO + 252 STEP 4: POKE C,0: NEXT :N = 1 :M = + 256 : RE 
TURN 

121 REM 

122 REM Lecture definition 

123 REM 

124 IF PEEK CO < 155 THEN INVERSE : PRINT CHR-$ C PEEK CO ♦ 64);: 



NORMAL : GOTO 126 4355 
125 PRINT CHR* < PEEK CO) j D6A3 
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126 PRINT ■ «> u j 5AF4 

127 AD = PEEK <C + 2) + ( PEEK tC + 3) - 31) * 256 E6E3 

128 FOR D = TO PEEK (G + 1) - 3 9FEF 
12? IF PEEK (AD + D) < 155 THEN INVERSE : PRINT CHRS < PEEK (AD + D 

) + 64>;; NORMAL F673 

138 PRINT CHR-I < PEEK 'AD + D>); D5F1 

131 NEXT D: IF PEEK <AD + D - 1) = 141 THEN CALL - 998 4A94 

132 PRINT : RETURN FEA5 

133 REM 

134 REN Traitement erreur 

135 REM — 

136 FOR C = 1 TO 80 :S = PEEK ( - 16336): NEXT : NORMAL : GOTO 16 6E2? 



Assemblage 
par ProcoDE 



200S : 


A9 


00 




2002: 


85 


3C 




2004: 


A9 


21 




2006: 


85 


3D 




2008: 


A? 


00 




200A: 


85 


3E 




200C: 


A9 


00 




200E: 


85 


3F 




2010: 


A9 


00 




2812: 


85 


42 




2014: 


A9 


40 




2016: 


85 


43 




2018: 


38 






2019: 


20 


11 


C3 


201C: 


A2 


21 




201 E: 


BD 


44 


20 


2021 : 


9D 


00 


83 


2024: 


CA 






2025: 


16 


F7 




2027: 


A? 


FF 




2029: 


85 


18 





5 

7 
3 
? 

13 

1 1 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
2? 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 



IND 


EQU 


•17 


ADD 


EGU 


$8 


FLhG 


EQU 


$18 


Al 


EQU 


-$3C 


A2 


ECU 


$3E 


A4 


EGU 


•$42 

•f ~ t 


SUA 


EQU 




LONG 


EQU 


■IF A 


TABLE 


EQU 


44 1 Pi ft 
*t loo 


PB1 


EQU 


» L t? O I 


AUXMOUE 


EQU 


VUwl 1 


XFER 


EGU 


* r "9 1 d 


KEY IN 


EQU 


-4 F D 1 R 


MOVE 


EQU 


± c p o p 




ORG 


t ~; Q u 


* Trans-f er t 


1 a b 1 e en 




LDA 






STA 


Al 




LDA 


6*21 




STA 


Al + 1 




LDA 


£0 




STA 


A2 




LDA 


£0 




STA 


A2+1 




LDA 


£0 




STA 


A4 




LDA 


£*40 




STA 


A4+1 




SEC 






JSR 


AUXMGVE 


* Trans-fert 


i nter-f ace 




LDX 


£33 


BCLX 


LDA 


DEBUT, X 




STA 


$300, X 




DEX 






BPL 


BCLX 


i In ilia 


\ i sa 


1 i on FLAG 




LDA 


£*FF 




STA 


FLAG 



LA ROUTINE 
EN LANGAGE 
MACHINE 



Ce programme source est donne 
sur fa disquette Tremplin Micro. 



memo ire aux i 1 I a i re 

; parametres pour AUXMOUE 
; depart 



; -fin ajustee par le BASIC 



; dest i nat i on 



tran-fer t 




(Suite page 40) 
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49 


* Vec tor i sat i 


on SED en discriminant DOS et PRODOS 


28 2B: 


AD Dl 93 


41 


LDA 


*3D1 ; 


DOS ou PRODOS'? 


292E; 


F9 0B 


42 


BEQ 


PRODOS 




2638: 


A9 ee 


43 


LDA 


£8 j 


['pet 1 P DOS 1 


2932: 


80 55 AA 


44 


STA 


$AA55 ; 




2935: 


A9 03 


45 


LDA 


£3 




2937: 


8D 56 AA 


46 


STA 


$AA56 




283A: 


60 


47 


RTS 






28 3B: 


8D C9 9A 


48 


PRO DOS STA 


$9AC9 ; 


c est PRODOS! 


29 3E. 


A9 93 


49 


LDA 




une autre magou i 1 1 e . . . 


2040 : 


8D CA 9A 


50 


STA 


*9ACA 




2943: 


60 


53 


RTS 










52 


* Interface qui sera logee 


en $399 


2044 s 


24 18 


53 


DEBUT BIT 


FLAG j 


definition en cours? 


2946 


18 18 


54 


BPL 


ENCORE ; 


ou i 


2948: 


20 IB FD 


55 


JSR 


KEY IN ; 


erwoie 1e caractere 


2946 


2C 61 C0 


56 


BIT 


P81 ; 


on appuie sur "pornme ouuerte"? 


204E : 


30 9 1 


?7 


BMI 


POMME ; 


ou i 


2950 


60 


58 


RET OUR RTS 




non , al ors re tour 


2051 


A0 00 


59 


PGMME LDY 


£8 




2953 


8C ED 03 


40 


P0MME1 STY 


$3ED ; 


parantetres pour XFER 


2056 


A0 46 


61 


LDY 


£*40 




2058 
265B 


8C EE 03 
38 


62 
63 


STY 
SEC 


$3EE 




205C 


, B8 


64 


CLU 


■ 


donne la main au bloc de trai- 


205D 


4C 14 C3 


oD 


JMP 


XFER j 


te;ent en *4098 de la m6m. aux 


2066 


t A0 2D 


66 


ENCORE LDY 


£$2D ; 


ici c'est en *402D sur EN CORE 1 


2862 


: D0 EF 


67 
68 
69 


BNE 

* tf i oc Q9 i r a 
QR6 


POMME 1 

i t em e n t 
$2100 




2100 


: A8 06 


79 


LDY 


ee 




2102: 84 


71 


STY 


IND 




2104: 35 F9 


72 


STA 


SWA 




2106: B9 88 41 


73 


CHERCHE LDA 


TABLE, Y 


riric , d y a d o <? 1 dans la. t a b 1 £ 


2109: C5 - 


74 


CMP 


SUA 




210B: Ftf 0A 


75 


BEQ 


TROUVE 




210D: C8 


76 


I NY 






210E: C8 


77 


I NY 






2UFi C8 


78 


I NY 






2119: C3 


79 


I NY 






2111 


: D0 F3 


80 


BNE 


CHERCHE 




2113: A5 F9 


81 


LDA 






2115: D0 25 


82 


BNE 


FIN : 


pas trouue 1 


2117 


: A9 08 


83 


TROUME LDA 


£0 i 


trouve . . . 


2119: 85 18 


84 


STA 


FLAG ; 


marque FLAG 


211B: C8 


85 


I NY 






211C: B? 00 41 


36 


LDA 


TABLE ,Y ; 


recupere la long.de definition 


21 IF 


: 85 FA 


87 


STA 


LONG 




2121 


: C8 


88 


I NY 






2122 


8 B9 90 41 


89 


LDA 


TABLE, Y ; 


recupere adr , de la definition 


2125 


: 85 08 


90 


STA 


ADD 
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2127; 


C8 






91 




I NY 








2128: 


B9 


8@ 


41 


92 




LDA 


TABLE ,Y 






2128: 


85 


89 




93 




STA 


ADD+1 






21 2D: 


A4 


87 




94 


ENCORE 1 


LDY 


IND 






212F: 


El 


88 




95 




LDA 


(ADD) ,Y 


i 


r£cup&re un caract^re 


2131 : 


C8 






96 




I NY 




f 


avance dun cran 


2132: 


84 


87 




97 




STY 


IND 






2i 34: 


C4 


FA 




98 




CPY 


LONG 


1 


f ini? 


2134: 


D6 


84 




99 




BNE 


FIN 


1 


non 


2138: 


A8 


FF 




188 




LDY 


£4FF 


i 


ouf -> marque FLAG 


213Ai 


84 


18 




101 




STY 


FLAG 






213C: 


A0 


8C 




182 


FIN 


LDY 


£4C 


■ 


parametres pour XFER 


213E: 


8C 


ED 


83 


183 




STY 


43ED 






2141 : 


A0 


83 




184 




LDY 


€3 






2143: 


8C 


EE 


93 


105 




STY 


43EE 






2146: 


18 






106 




CLC 








2147: 


B8 






107 




CLV 








2148: 


4C 


14 


C3 


193 




JMP 


XFER 


! 


donne la main a 1 •' i n ter-f ace 



Table des symbol es ordre alphabetique 



-A1........4083C 

-AUXMOVE. . .4C31 1 
-ENCORE, . . .$2868 
-IND, ..... .$8887 

-PB1 .4C861 

? -RETOUR 42058 

-XFER 4C314 



-A2 4083E 

-BCLX 420 IE 

? -ENCORE 1 . . .421 2D 

-KEYIN 4FD1B 

-POMME 42851 

-SMA 400F? 



-A4. ...... ,40042 

-CHERCHE . . .42106 

-FIN 4213C 

-LONG 409 FA 

-P0M1E1 42053 

-TABLE 44100 



-ADD .48808 

-DEBUT 42844 

-FLAG. . . . . .40018 

? -MOVE 4FE2C 

-PRODOS 4203B 

-TROU'JE 42117 



une edition d ne pas manquer ! 

N'attendez plus et plongez-vous des maintenant dans 
1'etude du langage machine. Ce nest pas aussi difficile 
que vous le pensez et Ton obtient rapidement, a partir 
de routines simples, mais efficaces, des resultats 
surprenants. 

La rapidite du langage machine — celui que votre Apple 
comprend le mieux — est proprement stupefiante. 



CLINS D'CEIL au 6502 DE L'APPLE 



regroupe les principals routines publiees dans les premiers 
numeros de TREMPLIN MICRO, mais aussi plusieurs pro- 
grammes inedits. Une disquette est fournie avec le livre 
(utiliser le bulletin de commande, a la fin de la revue). 







CLINS D'CEIL 

OO 6502 

DE L'APPLE 
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I Votre bibliotheque 

I INFORMATIQUE 



• EXCEL Tome 1 : 
Le tabfeur 
( Cedic Nathan) 

Les adeptes de Macintosh connaissent 
sans doute EXCEL, le nouveau tobleur 
multi-fonctions integrant graphiques 
base de donnees et macros... un logiciel 
capable de rival iser non sans succes avec 
LOTUS 1 -2-3, tellement prise par les pos- 
sesses du PCd'IBM. 

En plus d 'un tableur performant, EXCEL 
offre les meilleurs graphiques de tous les 
logiciels de gestion et permet done de 
creer des bistogrammes r courbes, ek. 
d'une rare precision. 

Le livre de Douglas Cobb est le premier 
de deux tomes consacres d ce nouveau 
logiciel et devroit permettre 6 ses utiliso- 
leurs de le moilriser ropidement. Le 
second volume leur fero decouvrir les 
possibility graphiques d'EXCEL, la ges- 
tion de base de donnees el la program- 
motion des macro-instructions. Tout un 
programme ! 





EXCEL 

TOME I: LE TABLEUR 
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* LE MANUEL TECHNIQUE 
DUNANORESEAU 

(Cedic/Nathan) 

Certains de nos lecleurs sont enseignants 
et parfois amenes a utiliser des M05, 
T07 et TO7/70. lis connaissent done le 
NANORESEAU, developpe par la societe 
Leanord. Celui-ci leur permet en effef de 
faire beneficier leurs pastes de travail de 



ressources qui leur font souvent defaut : 
memoire de masse a disque souple ou 
dur, imprimante... 

Ce manuel technique, redige par Gilbert 
Cornillel (qui travaille au Centre national 
de documentation pedagogique et a par- 
ticipe au developpement du NANORE 
SEAU) devrait leur permettre de mieux 
connaitre ce systeme et d en exploiter 
ainsi toutes les ressources. 




MANUEL TECHNIQUE 
DU NANORESEAU 




• ASTftOLOGIE, NUMEROLOGY 
BIORYTHMESSUR APPLE 11 
(Sybex) 

Pierrick ftourgoult est ingenieur informa* 
tkien, mois apres une formation universi- 
toire en biologie et en psychologie. Aussi 
est-il lauteur de logiciels de calcul astro- 
logique utilises par ban nombre de 
prolessionneh. 

Nous lui devons un ouvrage qui devrait 
satisfaire les amateurs d'astrologie occi- 
dentale ou chinoise et de numerologie. 
Les biorythmes — fort a la mode en infor- 
matique personnelle — n'y sont pas 
oublies. 

Chaque maliere comprend un clair 
expose sur le sujet considere, puis un 
petit logiciel de calcul et d'interpretation 
analyse point par point. 



par Clement RENARD 

On peut regretter que Sybex ne propose 
pos une disquette des programmes... les- 
quels peuvent etre consideres comme 
«consistants», mais e'est plutot un bon 
point pour le livre de Pierrick Bourgault, 

non 7 

• DICTIONNAIRE DE 
MICRO-INFORMA TIQUE 

(Cedic/Nathan) 

Une rendition dun dictionnaire portant le 
meme titre et paru dans la Collection 
Micro Monde. Ses auteurs : Eric Ouceou 
et Christophe Doe. Son objectif : expli- 
quer aussi simplement que possible, mais 
non sans rigueur, le vocobulaire de la 
micro-informatique familiale et profes- 
sionnelle... 6 trovers 200 articles. 

Un peu court, mais un index de plus de 
600 mots permel d'acceder directement a 
I'article ou tel ou tel terme fait I'objet 
d'une explication. Deux lexiques — 
Francais-Angfais et Anglais-Franr,ais — 
donnent les equivalents d'un certain 
nombre de mots-cles de la micro-infor- 
matique. 

Ouvrage succinct, sans doute suffisant 
pour un certain nombre d'utilisaleurs, 
mais qui faissera (es autres sur leur foim. 




DICTIONNAIRE de 
MICRO-INFORMATIQUE 

Me f^rfw ■ GmiuyMe Do* 
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UTILITAIRE 



DOS 3.3 exclusivement 



Marcel COTTINI 



ENLEVE DOS 



ENLEVE DOS est un utilitaire ecrit en longage Basic AppleSoft. II n'occupe que 
8 secteurs sur la disquette. Son role essentiel est de recuperer 32 secteurs 
d'une disquette systeme, pour une utilisation future en disquette fichiers. 

Les lecteurs de T.M. travaillant avec des fichiers texte connaissent tres bi$n 
le probleme. Une disquette systeme, comportant sur les trois premieres pistes 
le DOS, pourra etre facilement convertie en disquette fichiers, non bootable 
par la suite. Cette manipulation par le programme ENLEVE DOS, permet de 
recuperer les 32 secteurs des pistes $01 et $02, ce qui accroit la capacite de la 
disquette d'environ 6% . 

La recuperation de la piste $00 n'est d'aucune uti lite pour f'utilisateur, le DOS 3.3, 
de part sa conception d'origine, est incapable d'aller lire ou ecrire sur cette piste. 
La VTOC (Volume Table Of Contents), table d'occupation des pistes et secteurs de 
la disquette, est automatiquement mise a jour. Le programme marque libres les 
secteurs $00-$0F des pistes $01 et $02. En fin de programme, a partir de la ligne 
250, un texte amorce avec un sous-programme de boot 1 qui est mis en place sur 
la piste $00 secteur $00 (92 bytes de long). 



A PROPOS DU PROGRAMME 



La table (OB, debutant a partir de 
I'adresse SB7E8 (47080) pour un systeme 
boote sur une configuration de 64 Ko, 
renferme tous les para metres pour la 
lecture ou I'ecriture d un secteur (RWTS 
— Read Write Track Sector). 

La ligne 160 selectionne lo piste 17, sec- 
teur 00. 

La ligne 170 met le numero du volume a 
00 pour autoriser RWTS a traiter 
n'importe quelle disquette. Le POKE 
47091,0 positionne le compteur pour 
traiter 256 bytes d'un secteur. 

La ligne 180 fixe le pointeur de la zone 
du tampon de travail (buffer) utilise 
ulterieurement par la routine RWTS. 

La ligne 190 met en place un micro-pro- 



gramme a partir de I'adresse $0300 (768) : 
0300 : 20 E3 03 JSR S03E3 Recherche de 
I'adresse de la table IOB des para- 
metres de RWTS, 
0303: 4C D9 03 JMP $03D9 Lecture ou 
ecriture d'un secteur (RWT5). 

La ligne 210 fixe fe code de commande a 
la valeur 01, soit en mode lecture. CALL 
768 appelle le sous-programme a 
I'adresse $0300. La piste 17 secteur 00 est 
lue, puis place© dans le tampon se trou- 
vant a I'adresse declaree a la ligne 180. 

La ligne 220 ecrit 4 bytes (FF) dans le 
tampon du DOS reserve pour la routine 
RWTS. A cette adresse se trouve la repli- 
que de la VTOC. Cette manipulation 

(suite page 44). 
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equivaut a marquer comme fibres, les 
pistes $01 et $02, 

La ligne 230 reecrit, sur la piste 17 sec- 
teur 00, les 256 bytes se trouvant dans 
Je tampon reserve ou DOS (routine 
RWTS). Mointenant la VTOC marque 
entre autres, les pistes $01 et $02 
comme fibres, 

La ligne 240 selectionne la piste $00 sec- 
teur $00. 

La ligne 250, par I'intermediaire d'une 
boucle FOR/NEXT, lit les DATAs des 
lignes 300-310 et les place dans le tam- 
pon fixe par la variable LOC (adresse 
$2710). 

La ligne 260 appelle le sous-programme 
en $0300 et reecrit les donnees placees 
dans le tampon (adresses $2710-$276B). 
sur (a disquette a la piste $00 sec teur 
$00 plus precisemment, Ce secteur tres 



particulier pour le DOS, contient ton- 
lours le programme de boot 1 , permet- 
tant au systsme de connaitre la suite du 
processus de boot. Pour rappel, le pro- 
gramme du boot se trouve implante 
dans la carte contrdteur du lecteur de 
disquettes (adresses $Cs00-$CsFF). Boot 
effectue une lecture du contenu de la 
piste $00 secteur $00, puis place les 256 
octets a partir de I'adresse $0800. 
Ensuite, le micro-programme est exe- 
cute a partir de I'adresse $0801 . Le pre- 
mier byte etant uniquement un parame- 
tre de controle pour le DOS 3,3. 

Les lignes 300-310 contiennent les 
DATAs qui, apres lecture par ('instruc- 
tion READ, seront implantees a partir de 
I'adresse $2710. Cette zone de la 
memoire vive (RAM) n'est utilisee que 
provisoirement comme tampon interne 
de la routine RWTS. 



Le listing suivant commente les instructions placees sur la piste $00 secteur $00 
(boot 1 de la disquette). Chaque instruction machine est traitee, pour une meil- 
leure comprehension par le lecteur novice. 



2710 - 01 



2711 



2714 - 



JSR SFE89 
JSR SFE93 



2717 - JMP $0827 



271A - 
271B - 
271 D - 
271E - 
2720 - 
2722 - 

2724 - 
2726 - 



PLA 

STA $40 
PLA 

STA $41 

LDY £$00 

INC $40 

LDA ($40),Y 
BEQ S272E 



2728 - JSR SFDED 



Parametre utilise par le sous-programme de la carte contro- 
leur, La valeur 01 indique que seul un secteur devra etre lu, en 
I'occurrence le secteur $00. 

SETKBD. Selectionne le clavier comme peripherique d'entree 
(IN£0). 

SETVID. Selectionne I'ecran video comme peripherique actuel, 
mode sortie (PR£0). 

Saut au sous-programme (boot 1), apres implantation a partir de 
I'adresse $0800. En effet, apres le boot de la disquette, le sous- 
programme se trouvant sur la piste $00 secteur $00 sera place 
dans la zone memoire debutant a partir de I'adresse $0800. 

Depile le pointeur de poids faible, 

et le sauvegarde dans la page (A3L — LByte). 

Depile le pointeur de poids fort, 

et te sauvegarde dans la page (A3H — HByte). 

Initialise le registre Y comme compteur, 256 positions. 

Incremente le contenu de I'adresse $40 de 1 . 
Positionne le compteur sur le prochain byte. 

Charge le contenu de I'adresse $40 indexee par le registre Y. 
Adressage indirect, Y. 

Est-ce le dernier byte a troiter ? Branchement si zero. Si le 
dernier resultat est egaf 6 zero (bit Z = 1), ou si la derniere 
comparaison a donne I'egalite, on saute a I'adresse indiquee ; 
sinon, on continue en sequence. 

COUT. Fait executer le sous-programme de sortie de carac- 
tere, par exemple COUT 1 , 



NWN 
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272B - 


JMP $0812 


Saut au sous-programme, apres boot 1 . 


272E - 


LDA $41 


Charge le pointeur de poids fort, 


2730 - 


PHA 


et I'empile au sommet de la pile. 


2731 - 


LDA $40 


Charge le pointeur de poids faible. 


2733 - 


PHA 


et I'empile au sommet de la pile. 


2734 - 


JMP $FE84 


SETNORM. Commute le mode d'affiehage en normal. 


2737 - 


JSR $FC58 


HOME, Efface lecran et positionne le curseur en haut et 6 gau- 
che de I'ecran. 


273A - 


LDA £$0B 


Charge Taccumulateur avec la valeur 1 1 r 


273C - 


STA $25 


et la sauvegarde com me position verticale du curseur (CV). 



(suite pog& 46) 



168 


REM ENLEUE DOS 




1 1 
1 62 


RFM PAR MARTFt rnTTINT 

REM POUR TREMPL IN MICRO EMI E\fE TinC 






REM JUILLET 86 W 

null UU1ULLI SO 




1 h4 
1 o *t 


PPH r * .Tr + .Tr + .Tr t.Tr Kir t.F 

f>0 i LUL tut. Cul, XiJt. tJC \ \) 




1 1 ft 


1 LA 1 ■ nui tC 


1 L JH 


1 ?R 


SECTEURS CE QUI AU6MENTE LA"* PRINT TAPAPITF DF AV D13K NF 5F Rfl 






DTF PI E |c; ■ 


OP 1 A 


1 30 


PRINT • Ft A^H ■ PPTNT " ATTFNT I ON" • ■ MCIRMAI ■ PRINT " NF rflNTTNHF7 






PAS SI VOUS ~ ctjiNE VOULEZ PAS DETRUIRE LE DOS DU DISK!": PRINT 


8CC7 


148 


PRINT "IN5ERE2 LE DISK .PUIS " (RETURN > : " : : GET At: IF A* < > CHR 






% <13"? THEN 290 


A 1 DA 


158 


HTA8 1; INPUT "EFFACER LE DOS DE CE DISK ? CQ/N) s W ;A*: IF A* < 






> "0" THEN 290 


•J w. x % 


168 


POKE 47884,17s POKE 47985,6: REM SELECTI ONNE PISTE 1 7 , SECTEUR 8 


F8AB 


178 


POKE 47BB3.0: POKE 47091.6 


8B6F 


186 


LOG = 19808: POKE 47888, LOC - INT (LOG / 256) * 256: POKE 47889, 






INT CLOC / 256) 


4FD6 


196 


POKE 768,32! POKE 769,227: POKE 778,3: POKE 771,76: POKE 772,217: 






POKE 773,3s REM ROUTINE POUR SAUT A ' RUTS 


84B6 


218 


POKE 47092,1s CALL 768: REM LIT LE SECTEUR 


E487 


228 


POKE LOC + 68,255; POKE LOC + 61,255: POKE LOC * 64,255: POKE LOC 






+ 65,255: REM REECRIT 4 BYTES 


3FEC 


238 


POKE 47092,2: CALL 768: REM ECRITURE DU SECTEUR 


C788 


248 


POKE 47084,0; POKE 47885,8: REM SELECTI ONNE PISTE 0,SECTEUR 9 


1A73 


250 


FOR I = LOC TO LOC + 91 s READ V: POKE I,V: NEXT 


22DA 


266 


CALL 768: REM REECRIT NOUUEAU SECTEUR DE BOOT 


8331 


276 


VTAB 3: PRINT : CALL - 958 


24FE 


286 


PRINT : PRINT "TERMINE . " : PRINT : PRINT "UN AUTRE DISK ? (0/N): " 






;: GET A*: IF A$ = "0" THEN RUN 


2A9C 


296 


UTAB 20: END 


B5BE 


386 


DATA 1 ,32,137,254,32,147,254,76,39,8,184, 133,64,104,133,65,168 ,8, 
230,64,177,64,240,6,32,237,253,76,18,8,165,65,72,165,64,72,76,132 






,254,32,88,252, 169,11 ,133,37,169,18 


6778 


316 


DATA 133,36,32,34,252,32, 128,254,32,18,8,213,286,194,207,287,212, 
193, 194,204,197,160,196,193,212,193,168,196,261 ,211 ,203,8,166,43, 






189,136,192,169,22, 133,37,76,8,224 


A129 
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273E - 


LDA £$0A 


Charge I'accumulateur avec la valeur 10, 


2740 - 


STA $24 


el la sauvegarde comme position horizontale du curseur (CH), 


2742 - 


JSR $FC22 


VTAB deplace le curseur en CV 
— contenu de l adresse $25. 


2745 - 


JSR SFE80 


SETINV. Commute le mode d'affichage en inverse. 


2748 - 


JSR S08GA 


Saut au sous-programme, apres boot 1 . 



Table des codes ascii du texte unbootable data disk 



274B - 


D5 CE C2 CF 


UNBO 






CF D4 CI C2 


OTAB 






CC C5 AO C4 


LE D 






CI D4 CI AO 


ATA 






C4 C9 D3 CB 


DISK 




275F - 


00 


Fin de la table des codes ASCII. 




2760 - 


LDX $2B 


BA52H. Charge le pointeur de poids fort de la 


ligne de destina- 






tion en deroulement d'ecran. 




2762 - 


LDA SC088 X 


Commutateur de lecture seulement en AAEV. 




2765 - 


LDA £$16 


Charge I'accumulateur avec la valeur 22, 




2767 - 


STA $25 


et sauvegarde comme position verticale du curseur (CV). 


2769 - 


JMP $E000 


Vecteur d'entree du Basic Applesoft. 








E000 - JMP $F128 Demarrage a froid. 


Toutes les don- 



nees sent mises a zero, le pointeur de 
pile est reinitialise. ■ 



A LIRE ET A RELIRE 



Un ouvragre tres complet 
de Jean-Pierre LAGRANGE 




Systemes 
d' Exploitation 
et Systemes 
de Protection 
sur APPLE H 



Connaissez-vous vraiment les systemes d exploitation et les systemes de 
protection de votre Apple // ? Je parie que la reponse est negative... 
mais que gmnde est votre curiosite quand on evoque ces sujets. 

II est certain que le gros bouquin de Jean-Pierre LAGRANGE, un speeia- 
liste incontestable, va faire non seulement le bonheur de certains d£ve- 
loppeurs, mais encore eel ui de bon nombre d amateurs dits eclaires... ou 
desirant meriter ce qualificatif . 

Quand vous aurez potasse ce nouveau volume de MICRO APPLICATION 
— editeur dont la reputation n'est plus a faire — , vous saurez tout (ou 
presque) de la memoire de votre Apple, de ses systemes d exploitation . 
de I'implontation en memoire et sur disque, des appels systeme, de la 
structure d une disquette... 

Non, ce nest pas terming et il y a encore : les protections de la memoire 
et cedes des disquettes, les codoges et formatages speciaux, la protec- 
tion du chargement et les techniques des pirates... 

Plus de 400 pages bourrees duplications et de listages... pour moins de 
180 F (MICRO APPLICATION vous fournira eventuellement, en echange 
de 120 F, la disquette correspondonte. .. mais je ne I'ai pas testee). 

Clement RENARO. 
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DOS 



ProDOS 



NESTOR 



TRI RAPIDE 



Oubliez le tri en Basic ! 



Gagnez un temps precieux en utilisant, pour le tri de vos listes de mots, une 
routine en langage machine. Celle que nous vous proposons ici ne compte que 
183 octets,., a peine une longue lignede Basic ! 



TRI. 1.2 autorise !e tri de tableaux 
comportant plus de 255 ele- 
ments [Q a 254). Elle est implantee a 
parti r de I'adresse $300 (768) et utilise 
quelques octets de la page Q (verifiez 
que vous ne les employez pas deja dans 
votre programme). 



Toutes les 
versions 
de I'Apple 
nacceptent 
pas la 
syntaxe 
de la 
ligne 220 
(PRINT 

M$(l). 
Le cas 
echeant, 
travaillez 
sur 40 
colonnes. 



MOPE D'EMPLOI N oubliez pas de 

dimensionner le 
tableau, bien sur et n'hesitez pas d forcer 
la dose. Finalement, ce sera le nombre 
exact des mots saisis qui sera pris en 
compte. Attention ! N sera toujours egal 
6 N + 1. L'element peut etre utilise^. 
Syntaxe : CALL 768, N, M$(0). 



' Kapitk... par rapport b le torsion *n Bosk... cor li s'ogH dv Mb bulla, gmarahment considers (avec de ncmbreux tlbmenU} comme ttanl k plus tent. 



TRI.DEMO 



166 
113 
120 
122 
123 
124 

125 
136 
140 
150 
168 
173 



196 
220 

230 



TEXT : HOME 
DIM M*<4B9> 
PRINT CHR* 



PRINT CHR* <'4^"PR£3": PRINT :N = 1 



4>"BL0AD TRI. 1*2" 
gne k f etabl ir :GOT0138 

"309 FAUX MOTS DE 5 LETTRES. . .PATIENCE! " 
- l TO 5sHt<N) = M$CN) + CHP* <65 + INT 
NEXT :N ■ N + 1 : IF N < = 38 THEN 124 

GOTO 190 



RND CD * 2 



REM L 
PRINT 
FOR I 

6)) 

CALL - 198: PRINT "LE TRI COMMENCE" 
UTAB 10: CALL - 958: PRINT N 
VTAB 12: PRINT M*(N> i : HTAB li 

INPUT |M$(N) I IF MfCN) = "*" THEN N = N - 1 : GOTO 130 

IF M$<N> = THEN 189 

N = N + 1: IF N < = 400 THEN 130 

PRINT : PRINT "OUI POUR TRIER " ; : GET R* : PRINT : IF Rt < > 

"0" THEN 138 
CALL 768,N,M*C8> 

FOR I = 1 TO N: PRINT H$(I1 ( ! IF PEEK 1 
POKE - 16368,0: WAIT - 1 63B4 , 1 28 , 1 27 : 
NEXT 



1 - 16384) > 127 
POKE - 16368,0 



THEN 
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TRI A PARTIR DU CARACTERf 
P UN RANG DETERMINE : 

Inclure un POKE* 885, R — 1 (R = rang) 
avant la tigne Basic 190. Ainsi, POKE 
885,1 triera la list© sans tenir compte du 
premier caractere. 

* Voltvrt normal** . 865.9 - 987,252 — 899.9 - 995. 176. 



CLASSER & PARTIR PE LA PONNEE LA 

PLUS GRANDE (ordre alphabet ique inverse) : 

Par quelques pokes bien afustes : POKE* 
887,7: POKE* 889,252: POKE* 905,144. Ne 
pas oublier de retablir les bonnes valeurs 
pour realiser un tri normal. 



EXPLOITATION DE Pi (NOMBRI D ELEMENTS) 



300 


20 


BE 


DE 


JSR 


$DEBE 


303 


20 


7B 


DD 


JSR 


$DD7B 


306 


20 


52 


E7 


JSR 


$E752 


309 


A6 


51 




LDX 


$51 


30B 


A5 


50 




LDA 


$50 


30D 


DO 


05 




BNE 


$0314 


30F 


E0 


00 




CPX 


£$00 


311 


DO 


01 




BNE 


$0314 


313 


60 






RTS 




314 


86 


F9 




STX 


$F9 


316 


85 


FA 




STA 


$FA _ 



CHKCOM teste la virgule. 

FRMEVL evalue ('expression (vers FAC). 

GET ADR convertit FAC en valeur entiere que I'on peut lire 
en $50-51 . 

Si la valeur est £gale d 0, pas de tri. 

Pointeur $F9-FA initialise avec le nombre d'elements. 



EXPLOI1 



SCO 



20 BE DE 

20 E3 DF 



JSR $DEBE 

JSR $DFE3 



CHKCOM : teste la virgule dans TXTPTR. 
PTRGET : recherche la variable par son norm, 

f RE) INITIALISATION 



31 E 


A5 


83 


LDA 


$83 




320 


85 


85 


STA 


$85 




322 


A5 


84 


LDA 


$84 




324 


85 


86 


STA 


$86 




326 


A9 


00 


LDA 


£$00 




328 


85 


EB 


STA 


$EB 




32A 


85 


EC 


STA 


$EC 




32C 


85 


09 


STA 


$09 





AO 02 

Bl 85 

99 06 00 
88 

10 F8 



LDY £$02 

LDA ($85), Y 

STA $0006, Y 
DEY 

BPL $0330 



L'adresse de base est contenue dans $83-84 et il est facile 
de la relnstaller dans $85-86. 



On met dans $EB/EC le nombre d'elements tries. 

Si 9 = 0, pas d'echange, si 9 = l.ona modifie la liste. 

- CLEMENT O 

On 6crit page : 

— 6 : longueur de I'element. 

— 8' Zl ac ^ resse ou " es * 'rnp'o"*© dans la memoire. 



COMPARAISON COM 



UR POINTEUR 



338 


E6 


EC 


INC 


$EC 


33A 


DO 


02 


BNE 


$033E 


33C 


E6 


EB 


JNC 


SEB 


33E 


A5 


EB 


LDA 


$EB 


340 


C5 


F9 


CMP 


$F9 


342 


DO 


06 


BNE 


$034A 


344 


A5 


EC 


LDA 


$EC 


346 


C5 


FA 


CMP 


$FA 


348 


F0 


56 


BEQ 


$03A0 _J 










PRCPAI 










34A 


A5 


85 


LDA 


$85 n 


34C 


85 


18 


STA 


$18 


34E 


69 


03 


ADC 


£$03 


350 


85 


85 


STA 


$85 


352 


A5 


86 


LDA 


$86 _ 



Comparaison entre le pointeur 

* $EB-EC : nombre d'elements survoles... et 

* $F9-FA : nombre d'elements de la liste. 

Quand il y a egalite, GOTO $3A0. 



L'adresse + 3 (element suivant} est sauvegardee dans 
$18-19 (ou elle sera utilisee plus loin pour la permutation 
eventuelle) et plocee dans $85-86. 
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354 
356 
358 
35A 

35C 



85 19 

69 00 

85 86 

A5 06 

FG DO 



(Voir explications des 5 lignes precedentes, page 48). 



STA $19 
ADC £$00 
STA $86 

BEQ $032E I Si la longueur de I'ELEMENT est nulle, GOTO $32E. 
ELEMENT 1 



35E : 


AO 


02 


LDY 


£$02 


360 ; 


Bl 


85 


LDA 


($85) r Y 


362 : 


99 


FB 00 


STA 


$0OFB,Y 


365 : 


88 




DEY 




366 : 


10 


F8 


BPL 


$0360 



$FB = longueur de I'element 1. 
|pq adresse ou il est implante. 



3A7 : 60 



RTS 



3A8 : 


A5 


EB 


LDA SEB 


3AA: 


C5 


F9 


CMP $F9 


3AC: 


DO 


06 


BNE $03B4 


3AE ; 


A5 


EC 


LDA $EC 


3B0 : 


C5 


FA 


CMP $FA 


3B2 : 


BO 


EC 


BCS SO 3 AO 


3B4 : 


AC 


2E 03 


JMP $032E 



368 


A5 


FB 


LDA 


$FB 


36A 


FO 


1 F 


BEQ 


S038B _J 


36C 


C5 


06 


CMP 


$06 


36E 


90 


02 


BCC 


$0372 


370 


A5 


06 


LDA 


$06 


372 


85 


FE 


STA 


$FE _ 




a n 


ftfl 


E 

i nv 


r ton — I 


O / o • 


pi 

D 1 


Ct~ 

rv_ 


1 l*>A 

L L/A\ 


l»rv^/ ( t 




V 1 


U/ 




tn7i V 




Eft 
rU 


ft A 






37C: 


B0 


2A 


BCS 


$03A8 


37t : 


DO 


OB 


BNE 


(Anon 

$038B 


380 


C8 




INY 




381 : 


C4 


FE 


CPY 


$FE 


383 


DO 


Fl 


BNE 


$0376 


385 


A5 


FB 


LDA 


$FB 


387 


C5 


06 


CMP 


$06 


389 


B0 


1 D 


BCS 


$03A8 J 


38B 


A9 


01 


LDA 


£$01 ~\ 


38D 


85 


09 


STA 


$09 J 




38F 


AO 


02 


LDY 


£$02 ""I 


391 


Bl 


85 


LDA 


($85), Y 


393 


48 




PHA 




394 


Bl 


18 


LDA 


($18),Y 


396 


91 


85 


STA 


($85), Y 


398 


68 




PLA 




399 


91 


1 8 


STA 


($I8),Y 


39B 


88 




DEY 




39C 


10 


F3 


BPL 


$0391 


39E 


; 30 


08 


BMI 


$03A8 


3A0 


: A5 


09 


LDA 


$09 1 


3A2 


: FG 


03 


BEQ $03A7 J 


3A4 


: 4C 


IE 03 


JMP 


$03 IE 



Si $FB = 0, permutation immediate. 

Si la longueur de I'ELEMENT 1 est plus petite que celle de 
I'ELEMENT 0, le contenu de A est bon. Sinon on prend la plus 
petite longueur que I'on stocke dans $FE. 



Caractere de I'ELEMENT 1 (de rang Y) compare a celui de 
I'ELEMENT 0. 

Si egalite, la boucle continue. 

Si plus grand, pas de permutation (GOTO $3A8). 

Si plus petit, permutation immediate (GOTO $38B). 

Comparaison terminee si Y est egal 6 $FE. 

Si la longueur de I'ELEMENT 1 est egale ou plus grande que 
celle de PELEMENT 0, pas de PERMUTATION. 



09 est mis a 1 . 



L'adresse de I'ELEMENT 1 

prend la place de celle 

de I'ELEMENT 0... et vice-versa. 



GOTO $3A8. 
TRI TERMINI 7 



S'il n'y a eu aucune permutation, tri termine. 

Sinon on recommence. 
RETOUR AU BASIC. 

ULTIME CONTR6LE — 



_ 



Compteur compare avec $F9-FA. 

Si son contenu est egal ou plus grand, voir $3A0 

(permutation ou pas 7). 

Affaire a suivre,,. 



TREMPUN MICRO 



UTILITAIRE 



TRI.COMPL 



Voir TREMPLIN MICRO 

numero 10, pages 26-27 et 28. 



Le programme 
TRI .1.0 ne 
foncrionne 
que dans la 
mesure ou le 
nombre d'elements 
a trier est identique 
a celui declare 
par DIM. 



Avec le PATCH 
de TRI.COMPL 
(figne 250), 
vous pourrez 
utiliser 
TRI. 1.0 sans 
cette contrainte. 



Nolei to nouvefle 
formulation de f'appel 
a la routine figne J9ff. 



T HEN N = N - 1 : GO 



100 TEXT : HOME : PRINT CHR* (4>"BL0AD TRI.l": GOSUB 
246 

105 PRINT CHR* <4)'*BSAVE TRI .1,1 , A*300 , L$9C" : REM INU 
TILE DE CONSERUER CETTE LIGNE APRES LfNE PREMIERE 
UTILISATION - LA NOUVELLE VERSION SERA SUR LA DIS 
QUETTE 

110 DIM M*<254): REM PAS PLUS DE 255 ELEMENTS <0 A 25 

4, so it 255 ou *FF) 
128 N ■ N + i 

139 UTAB 19: CALL - 958: 'PRINT N 

140 VTAB 12: PRINT Mf(N)}I HTAB I 
150 INPUT * * |M$(N> I IF Mf(N) = B * 

TO 139 

160 IF M*(N> = THEN 189 
170 IF N < 254 THEN 128 
180 PRINT : PRINT "OUI POUR TRIER 
IF R* < > "0 U AND R* < > "o ,J 
190 CALL 768,N,M*C0> 

200 FOR I = 1 TO N: PRINT M*(I): NEXT 
210 END 

248 FOR I = 768 TO 794: READ R: POKE I 
RN 

256 DATA 32,190,222,32,123,221,32,82,231,165,80,28 

,176,1 ,96,133,256 ,32,190,222,32,227,223,234,234,2 
34 



"\i GET 
THEN 13? 



Rti PRINT 



,R: NEXT : RETU 



,2 



LA LIGNE DATA — 

CHKCOM teste la virgule. 
FRAAEVL evalue I'expression (FAC). 
| GETADR convertit FAC en valeur entiere et le resultat est 
J dans $50-51. 

| Si mains de 2 elements, pas de TRI. 
Retour. 

Nombre d'efements place dans $FA. 
Re... teste la virgule. 
PTRGET recherche la variable. 



NOP... sans signification 



Apres I'avoir utilisee une fois, vous pourrez sauver la nouvelle routine : BSAVE TRI.1 .1 ,A$30O,L$9C 
Rappelons qu'elle ne peut trier plus de 255 elements DIM X$(254). 



300 : 


20 


BE 


DE 


JSR 


SDEBE 


303 : 


20 


7B 


DD 


JSR 


SDD7B 


306 : 


20 


52 


E7 


JSR 


$E752 


309 : 


A5 


50 




LDA 


$50 


30B : 


C9 


02 




CMP 


£$02 


30D: 


BO 


01 




BCS 


$0310 


30F : 


60 






RTS 




310 ; 


85 


FA 




STA 


$FA 


312 : 


20 


BE 


DE 


JSR 


SDEBE 


315 : 


20 


E3 


DF 


JSR 


$DFE3 


318 : 


EA 






NOP 




319 : 


EA 






NOP 




31 A 


EA 






NOP 
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GUY-HACHETTE 



Madeleine HODE, auteur de GRI- 
BOUILLE, traitement de texte dont 
on ne vantera jamais assez les nom- 
breuses qualites, prend des risques 
(calculus ? ) : elle commercialise 
son logiciel sans aucune protec- 
tion... mais elle fait confiance aux... 



PIRATES 
AU COEUR PUR 




TREMPUN MICRO : Que pensez vous du 
piratage des logiciels ? 

M. HODfe : Jedetesteles gens qui ven- 
dent les copies piratees, ou 
qui les donnent pour placer une ma- 
chine, Ce sont des rampants. 

Mais le pirate au caeur pur, je le com- 
prends. One disquette bien lockee, c'est 
une enigme terriblement excitante. On 
doit y perdre le boire et le manger ! 

Malheureusement, les copies circulent. 
Les logiciels ne se vendent plus. On finira 
par ne plus en ecrire. J'aimerais connaTtre 
I'auteur de Locksmith, On ne sait rien de 
lui, son nom n'apparatt meme pas a 
I'ecran. Incroyable : il continue. II y a tou- 
jours une derniere version, plus perfor- 
mante que la precedente. J'ecris dans 
mon manuel qu'on devrait lancer une 
souscription pour lui. Tremplin Micro 
pourrait s'atteler 6 cette tache ! Faites 
une enquete, trouvez-nous I'auteur de 
Locksmitn, pariez-nous de lui. Existe-Ml ? 
Locksmith alias Bourbaki ? Dites-nous 
qui est I'auteur de Locksmith, dites-nous 
comment acheter Locksmith, Pas trop 



cher r quelques centaines de francs. 
Parmi vos lecteurs, beaucoup seraient 
heureux de lui envoyer une remunera- 
tion, lis auraient un manuel (un manuel 
de Locksmith, quelle merveille !) et 
aussi un abonnement pour les mises 6 
jour, £o marcherait, et vos lecteurs 
seraient contents* 

Meme chose pour Disk Fixer, pour Bags 
of Tricks. Ce sont des logiciels merveil- 
leux, indispensables, a peu pres introu- 
vables dans les boutiques, et tnconnus 
du public. Decidement non, les pirates 
au cceur pur diffusent mal les logiciels, 

TREMPUN MICRO ; Vous complex cepen 
dont sur ces pirates au 
cceur pur pour vous aider 6 diffuser GRIBOUILLE, 
a en fair© un traitement de texte populoire ? 

M. HOPE : Oui, pour mon GRIBOUILLE, 
vous avez vu que j'essaie 
precisemenf cette formule : pour quel- 
ques centaines de francs (610 francs 
exactement) on a un manuel et des dis- 

(suite page 52) 
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queries. II est vrai que I'on peut avoir la 
meme chose pour beaucoup moins 
cher : les disquettes ne sont pas prote- 
gees, et le monuel passe com me lettre 6 
fa poste sur les grosses photocopieuses, 
Je ne peux pas empecher cette forme de 
piratage. Je tente de faire plus. J'ai le 
service apres vente. On peut m'ecrire 
{on ne s'en prive pas, heureusement). 
Interrogez vos lecteurs ; depuis que je 
vends mon programme moi-meme, vous 
ne trouverez pas de lertres en souf- 
f ranee. Je reponds le jour meme ou le 
lendemain. Je le ferai tou jours. S'il y a 
trop de leftres, je me ferai aider. Mais je 
liens par-dessus tout au dialogue, au 
contact. C'est indispensable pour moi et 
pour GRIBOUILLE. Les meilleures idees 
m'ont ete donnees par des utilisateurs. 

TREMPLIN MICRO : Vous croyei done ou 
dialogue et mieux : 
vous le tolltclttx... 

M, HOPE ; Bien sur, et pour les utilisa- 
teurs de GRIBOUILLE aussi, 
c'est important. Un traitement de texte 
est un logiciel de base. Cest un outil. La 
passivite, I'anonymat sont une souf- 
france. II faut pouvoir dire 6 I'auteur : 
"Tel true est mal con^u, je veux faire 
telle chose, et je n'y arrive pas, le 
manuel est incomprehensible". II y a un 
courant, une amitie qui passent. Vous 
avez vu dans mon manuel les trois 
"fiches" ecrites par des utilisateurs ? 
Vous les avez lues ? Vous avez vu de 
quelle quafite ©lies sont ? Et ils ont 
accepte tous les trois que je donne leurs 
noms. Ces trois fiches, c'est vraiment le 
bonheur et la fierte ! 

TREMPLIN MICRO s D'aecord, mois revenons 
aux choses concretes, 
vaulei-vous ? Porlez-nous do votro systems do 
miso a jour... 

M. HOPE ; Ce systeme de mise a jour : 
rien de complique. En ache- 
font GRIBOUILLE, on s'abonne en quel- 
que sorte. On re^oit de temps en temps 
"Gribouille and Co". On m'ecrit et je 
reponds. On me dit ce qu'on veut trou- 
ver dans la prochaine mise a jour : mai- 
ling, fichier d'adresses. envoi sur 
modem, consultation de fichier avec 
possibility de prelevement, ou autre 
chose... (Les etudes de marche 
m'assomment, je prefere etre guidee 
par les utilisateurs). 

De temps en temps, on recoit une propo- 
sition honnete : pour tel prix (par exam- 



ple 200 francs) je vous expedie une dis- 
quette et un complement de manuel qui 
font telle ou telle chose. On achete, ou on 
attend la mise d jour suivante. 

TREMPLIN MICRO i Interessant et nouveou, 
mois ou trouver GRI- 
BOUILLE ? Jusqu'a maintenant, la commerciali- 
sation n'etait pas tr« bien conduite... 

M. HOPE : La version ProDOS de GRI- 
BOUILLE est vendue unique- 
ment par I'auteur et voici la bonne adresse : 
Societe GRIBOUILLE, 
16, rue de Poules, 67000 STRASBOURG. 
Cheque de 610 francs TTC, port compris, 
1 1 belle a I ordre de GRIBOUILLE. 

Personne d'autre ne vend GRIBOUILLE 
ProDOS. La togique est rigoureuse : je 
vends bon morche pour decourager les 
copieurs : je veux connaTtre avec certi- 
tude le nom des personnes qui ont achete 
mon logiciel (a cause du service apres 
vente). Ces deux imperatifs m'interdisent 
de passer par des intermedia ires. D'ail- 
leurs les concessionnaires Apple le com- 
prennent tres bien. lis donnent mon 
adresse a leurs clients, alors qu'ils 
n'attendenf aucune commission, ni 
aucune forme de remuneration. Cela 
aussi, je voudrais que vous le disiez, 

TREMPLIN MICRO : Parlei*nous un peu de 
votre bulletin de 

liaison... 

M. HOPE : Vous ne connaissez pas 
"Gribouille and Co" ? C'est 
le journal des amis de GRIBOUILLE. Le 
mot le plus frequent, c'est "Comment" : 
Comment ecrire des programmes en 
Applesoft avec GRIBOUILLE ; comment 
im primer I 'adresse de I'expediteur a 
gauche et celle du destinataire a droi- 
tre, juste en face ; comment faire ses 
graphiques en Applesoft et les enregis- 
trer (pour pouvoir les imprimer avec 
GRIBOUILLE, bien sur). 

Beaucoup de procedes et de "trues". Un 
peu comme Tremplin Micro, Et puis aussi, 
probablement, des annonces et des 
echanges. J'ai un client qui veut echanger 
un alphabet grec centre un alphabet cyril- 
lique. Une bourse d'echanges de caracte- 
res personnalises. c'est une idee, non ? 



Madeleine HODi avrait pv nous porter de son enfant 
pendant des hevres. Cite en connoit le moindre octet et 
a du surmonter bien des diffkvttes pour en faire 
i "excellent traitement de texte qui I est devenu (les 
premieres versions mSritaient deja ce qualificailf). 
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CRI BOUILLE 

sait couper les mots en Frangais 

La nouvelle version de Gribpuille n'a rien a envier a I'ancienne, on 
s'en doute. Madeleine HODE s'est efforcee de tenir compte des sug- 
gestions, mais aussi des critiques que lui ont adressees les premiers 
utilisateurs de cet excellent traitement de texte fran^ais. 

II fonctionne sur Apple lie et sur Apple lie avec carte 80 colonnes 
(128 K). ProDOS lui confere une grande rapidite dans le chargement et 
la sauvegarde des fichiers. 

L'un de ses premiers avantages est de se satisfaire de la presence 
d'un seul lecteur, mais il apprecie celle d'un second, II semble etre 
capable de s'adapter a toutes les imprimantes, pourvu qu'elles se 
revelent compatibles avec I'Apple //... et son auteur est disposee a 
etudier les cas qui ne sont pas encore prevus (en existe-t-il ?}. 



L'apprentissage : une simple formalite ! 



Madeleine HODE vous propose de connaT- 
tre "Gribouille en une heure" grace a une 
disquette DEMO et elle est a peu pres 
sure de gagner son pari dans la plupart 
des cas. Meme si vous n'avez jamais uti- 



lise un logiciel de traitement de texte, 
vous maftriserez rapidement celui-cL 
D'ailleurs, si vous rencontrez des difficul- 
tes, le manuel. tres complet, vous four- 
nira tous les renseignements souhaites. 



Les points forts 



Frappe, remaniement de texte et correc- 
tions sont rapides et n'exigent ni acroba- 
ties ni memoire d'elephant. 

Le glossaire est cree par frappe directe et 
la longueur des cles d'appel est modula- 
ble, II peut comporter des sauts de ligne 
et des caracteres de controle destines a la 
mise en page ou a des codes d' impres- 
sion. II sera memorise sur disquette et 
outomatiquement charge lors de chaque 
chargement du logiciel. 

La capactte de Gribouille est de 45000 
caracteres, ce qui n'est deja pas mal, mais 



il est evidemment possible d'enchamer 
plusieurs fichiers lors de I'impression. 

La mise en page respecte parfaitement 
les regies de la typographie tradition- 
nelle, notamment pour les coupures de 
mots, en bout de ligne. Elle peut etre 
□ffichee ©t contrdlee sur I'ecran. Cette 
facilite ameliore considerablement la 
presentation de certains textes (rap- 
ports, theses, etc.). Notons au passage 
que la justification reste assuree, pour 
une meme ligne, avec differentes poli- 
ces de caracteres. (suite pogm S4) 
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II est possible et facile de creer et d'utili- 
ser des caracteres personnalises (quand 
hmprimarite le permet). C'est un plus 
appreciable quand on desire ecrire des 
formules mathematiques... ou editer un 



texte dans certaines langues etrangeres, 
Et les graphiques ? Oui r ils viennent tout 
naturellement s'inserer au milieu du texte 
a condition de les avoir enregistres au 
prealable. 



Et encore... et encore... 

Faut-il 1 parler des lettres-types, des for- 
mulates, de la tabulation des nombres 
(aucun problems des calculs arithmeti- 
ques faciles, en ligne et en colonne, de la 
facturation ? Inutile puisque tout cela a 
ete prevu par une Madeleine HODE qui 
s'est verttablement surpasses ! 



Un detail . le manuel de Gribouille est 
fourni sans classeur et ce tres beau log i - 
ciet a renonce a la souris et a ses menus 
deroulants. Qui le lui reprochera ? Certai- 
nement pes ceux qui, a I'usage, en appre- 
cieront les nombreuses qualites. 

Guy-HACHETTE. 



Du coq a I'ane 



TRANSUST (n°7> 

Avez-vous corrige I'erreur manifesto de la 
ligne 705... ou E$(LI) doit etre rem place 
par ES$(LI) ? Annie Lecamp a bien gagne 
sa prime en nous signalant cefte erreur 
des la reception de son numero. Bravo ! 



teur. Quand paraTt le *, tapez ! suivi par 
ENTER ; si le symbole d'appel devient ! , le 
mini-assembleur est present et vous pou- 
vez commencer a entrer un programme. 

Vous pouvez aussi examiner certains bits 
d'identification dans la ROM pour savoir si 
vous avez la nouvelle ROM ; pour le lie, il 
faut avoir $00 dans $FBBF, et pour le lie 
SE0 dans $FBC0. 

Si en revanche vous lisez $FF et $EA res- 
pectivement, vous avez l ancienne ROM. 



RUBANS SCRIBE 

• Pourriez-vous me dire si la production 
des rubans pour I'imprimante SCRIBE est 
orretee,,. et me preciser ou if est possible 
de s 'en procurer ? H D (6W0Q ouniNS) 

jj^j Vous n'etes pas le seul a courir d la 
poursutte des rubans. Demandez a 
votre revendeur qu'il fosse son tra- 
vail et ne se contente plus de vendre 
des machines. C'est cela qu'on 
appeile un SERVICE ! 

MINI-ASSEMBLEUR lie 

• Se vous envoie cette note (traduction 
d'un extrait de la rubrique HELP, dans A -f- 
de mai 1986). 

G. d* J (69590, ST-$r?HORfEN-SUR-COIS£) 

La nouvelle ROM qui permet au tic de 
fonctionner avec I'Unidisk 3,5 comporte 
un mini-assembleur. Pour savoir si votre 
lie est dote de ce mini-assembleur, faites 
un CALL — 151 pour entrer dans le moni- 



2. 



TM 



TEXT et RND 

I. Comment revenir en mode texte, a 
partir du moniteur, sans passer par le 
Basic ? 

Comment etre sur que Von n'obtiendra 
pas tou fours le meme nombre en allu- 
mant I' APPLE, avec la fonction RND ? 

Mogali (38190 BfttGNOUD) 

1- Simplement en tapant *F399G 

(adresse de la routine TEXT). 
2. Essayez ce true en Basic (il existe 
surement mieux). C'est a charger 
en mettant le programme en 
route. 

10 TEXT : HOME : PRINT CHR$ (4) 
"BLOAD ALEA" 

15 POKE 157, PEEK (768): CALL 61364 

20 X = \ + INT{RND(1) * 256) 

25 PRINT X 

30 POKE 768,X: PRINT CHR$ (4) 
"BSAVE ALEA,A768.ll" 
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HISTO.TEXT EN COULEUR 

Notre ami Pierre PRIVAT vous propose 

de modifier HISTO.TEXT (n°9) pour 

I'utiliser avec les options couleurs dis- 

ponibles sur I'IMAGEWRITER II (listage 

ci-eontre). 

Lignes modifiees : 

376, 377, 378, 379, 380, 381, 382, 383, 
401, 402 et403. 

A vous de jouer et merci a Pierre 
PRIVAT {de CASTRES). 

NOUVELLE INCURSION 

Erreur dans la ligne 315, II faut rem- 
placer le GOTO 310 par un GOTO 305. 
En marge (255). il faut lire 205 au lieu 

de 105. 

Merci a Andre Chagon (LYON) et aux 
autres lecteurs perspicaces ! 

CADRE (p33, n°G) 

Remplacer le 84 de la ligne 280 par un 
85 (nombre reel de donnees). Frederic 
Blanc ne nous en voudra pas d'avoir 
oublie de publier ce rectificatif plus 
tot. Nous recevons beaucoup de cour- 
rier et celui-ci — parole de Nestor ! 
— n'est pas mformatise. 

DMP UTILITIES 

• Je viens de retire mon Tremplin 
Micro n°9 et j'ai vu qu'un lecteur 
cherchaH des "Pontes de coracteres" 
a mettre sur son Imagewriter. Je 
crois savoir ce qui ferait son bon- 
heur. Le programme s'appelle DMP 
Utilities, Il permet de mettre dons la 
memoire de (Imagewriter I ou II (ou 
encore EPSON FX/JX) 24 fontes de 
coracteres. tl n'est pos distribue en 
France mais on peut le trouver direc- 
tement a ladresse suivante : 



Viib&rg Brothers Co tip. Inc. 
4201 H&gg Av&nu* 
Madison. Wl 53716 
USA 



Ce programme est sous DOS 3,3 
livre avec un manuel de 67 pages. Let 
prix de vente est de 50 dollars (-f- 4 
dollars de transport). 

L. P. (42155 POUIUY-LES NONAINS) 
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REM ******* IMPRESSION #*********** 
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803A 


379 


UTAB 24: .HTAB 8: INVERSE : PRINT " 






PRESSER UNE TOUCHE POUR IMPRIMER CE 






TTE PAGE 'CTPL-C = A REFAIRE^ ":: N 






ORMAL : CAL [ - 1^8: GET RS : VTAB 1 






: PRINT H " : IF RS = CHRS (03) THEN 






1 50 


283B 


375 


IF p$ = CHRS (27) THEN 780 


65F7 


376 


HOME 


2F^7 


377 


^TAB 4; HTA6 23: PRINT "CHOISISSEZ 






LES COULEURS DES BARRES: " : PRINT : 






HTAB 35: PRINT "NOIR "" = 9": HTAB 3 






5: PRINT M J A UNE = 1": HTAB 35: PRI 






NT 'ROUGE "= 2": HTAB 35: PRINT "BL 






EL) " '= 3": HTAB 35: PRINT 11 ORANGE = 

!■ Vb W 1 111 fr W W W • * I \ 4 1 « I w r . r 7 1 » > — l_ 






4" 


A672 


378 


HTAB 35: PRINT "UERT ""= 5": HTAB 3 






5: PRINT "VIOLET = 6" 


C05F 


37? 


VTAB 16: HTAB 29: PRINT " COULEUR BA 






RRE "Al" ■ " ' * INPUT U ":C1: IF CI > 






6 THEN CALL - 198: GOTO 379 


5806 


380 


UTAB 17: HTAB 29: PRINT "COULEUR BA 

"r 1 LJ X 1 9 III LJ 4»m 'V ■ 1 Mil 1 w "L.* \J L> L_ W 1 \ Ui " 






RRE "A2" : ";: INPUT "■;C2: IF C2 > 






6 THEN CALL - 198: GOTO 380 


A882 


381 


VTAB 19: HTAB 31: INVERSE : PRINT " 






CORRECT ? (0/N) ";: NORMAL 


7458 


382 


GET R$: IF Rf ■ UH THEN 382 


CB06 


383 


IF R$ = "N" OR R$ = "n" THEN GOTO 






376 


503A 


384 


HOME : PRINT CHR* (21): PRir-iT 


841A 


385 


PRINT CHR* <4) w PR£i M : PRINT : PRIN 






T CHR$ (9)"80N"i PRINT CHR* <2?) m > 

1 wrf Ills ~ \ r r W WPl ■ * i x i ■ ■ ■ ■ ■ ■ v mm * 






CHR^ (27)"T15' 1 : CHR$ <27)"E W : 


8F44 


390 


FOR 1 = 1 TO 23: IF 1 = 1 OR I = 23 






THEN PRINT L*(I): GOTO 415 


A875 


395 


PRINT LEFT* (U*<T).6): 


FD9A 


400 


FOR J = 7 TO L FN CL*<I)):Lt = MID 






* C 1 4( T ) J 1 ) 


1 1 63 


40 1 


IF L* = "W" THEN PRINT CHR* <27)" 






Pi w 4 | 


27E5 


402 


IF Li = "N" THEN PRINT CHRf (27)* 






K " C2 • 


ECDD 


403 


IF L* = "U" OR L* = " " OR L* = B W B 






OR L* = "L - OR = n N n THEN PRINT 






CHR$ (27); CHRf <38> 5 L* ; CHR$ <27>; 






CHR* (36): CHR* <27)'K0 B :: GOTO 419 

U 1 Mat 1 w W r ■ Wl ll\T % 1 . nw ■ i W W I W ■ * V 


C7CE 


485 


PRINT 1$; 


1865 


410 


NEXT 


0582 


415 


PRINT : NEXT 


6576 


420 


PRINT CHR* <4) M PR£0" 


815F 


425 


PRINT CHRt (4) B PR£3": PRINT : HOME 






: GOTO 188 


FCA5 
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Les solutions 

dTvan KOEN1G 



Nous transmettons parfois certai- 
nes des lettres de nos correspon- 
dants a Yvan KOENIG, lequel 
reussit generalement a trouver 
une solution a leur probleme. 
Voici des exemples recents... 



CHANCER PE SLOT OU DE DRIVE ? 

Oui, il est possible de changer de slol et 
de drive par un ou deux POKE(s). 

DOS 3.3 POKE 43624 J » lecteur 1 

POKE 43624,2 » lecteur 2 

POKE 43626,6 » port 6 



ProDOS Dans ce cas un seul octet est 
concerne dans lequel sont sto- 
ckees les deux informations a savoir 
$BF3<3 : %Dsss0000 

POKE 48944, port * 16 + (lecteur — 1) * 128 



LA FONCTION RE 



CTADI 



La fonction RESTORE numligne est tout a fait programmable. On peut la trouver dans Ciefs pour 
APPLE lie, dans POM'S 5 etc. 



PARAMETRE T SOUS PfOPOS 

• A quoi serf le T dans certe instruction t 

Iff PRINT CHR$(4) J "OPEN" ; PR$;NF$;"TTXF 

II est vrai que le parametre T est peu utilise par les 
amateurs, Cependant il est parfois indispensable. 
Pour creer un SOUS-CATALOGUE il faut faire 
CREATE/prefix/titre , TDIR. 

On peut egalement employer ce parametre pour 
affecter un titre a un fichier sons le garnir et ce 
peut etre utile pour placer les divers litres dans 
un ordre choisi. On peut oussi definir des fichiers 
de type particulier ; ainsi, MERLIN PRO utilise des 
fichiers de type REL differents d'ailleurs des fichiers 
de meme type generes par I'assembleur APPLE 
lorsque le pseudo-opcode REL est employe. Cer- 
tains parmi vous connoissent deja PRO-CMD de 
Glen BREDON qui utilise des fichiers de type 

LES IMPRIMANTES 

• Peut'On revenir en orriere dans un programme 
quand on est entre dans une fonction a'impression 
sons avoir allume I'imprimante ? 

A ma connaissance, e'est NON, mais avec certai- 
nes imprimantes ce n'est pas necessaire : il suffit 
d'allumer I'imprimante et tout fonctionne 
norm element. 

• Dans le cas de I'tMAGEMtTER + carte Super 
Serie esNI possible de de teeter let at de I'impri- 
mante (allumee ou pas) par un POKE t 

C'est presque la meme question et la reponse est 



CMD et des fichiers de type $F7 pour les images 
DHGR compressees. Tremplin Micro publie 
SLOADC (qui permet de sauver tres facilement les 
ecrons 80 colonnes sous forme normale ou sous 
forme compressee dans des fichiers de type $F1) 
dans la fiche de ce numero. 

Vous utiliserez encore le parametre T pour obtenir 
un catalogue selectif . Si vous tapez CATALOG.TBIN 
seuls les titres des fichiers binaires seront affiches. 
Vous pouvez aussi employer les autres types (TXT, 
BAS, VAR, REL, SYS) et il est meme possible de 
creer vos propres types mais si vous en etes 
16, vous n'avez plus besoin de mes services ! 

En tout etat de cause, 1'utilisation de TTXT ne 
s'tmposait pas dans lexemple ci-dessus car OPEN 
s'adresse par defaut a un fichier du type TXT. 



encore "non", MAIS le probleme se situe au niveau 
de Interface car la carte ALPHABETS II de STREET 
ELECTRONICS envoie sur ecran ie message WAI- 
TING ON PRINTER si ladite imprimante n'est pas 
raccordee a la carte, si elle n'est pas alimentee ou 
allumee, si enf in elle est desactivee (voyant SELECT 
eteint). Je so is de quoi je parle car mon IMW 2 
vient de me quitter 15 jours apres so livraison pour 
un probleme de reglage mecanique, et que bien 
entendu, une fois sur deux je fais PR£1 alors que 
ma carte serie alimente octuellement I'air chaud 
de VALLA URIS. ■ 
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GUY-HACHETTE 



Luc M OREAU r£pond k nos lecteurs 

L'APPLE lie et Umprimante 



Voici un element de reponse au probleme pose 
par les lecteurs utilisant une imprimante apres 
le chargement d'un ecran 80 colonnes ( T,M. n°9, 
page 45 : Ecran 80 colonnes). II s'agit encore des 
secrets des ports series de I'Apple He \ 

Le programme de sauvegarde et celoi de char- 
gement d'ecrans 80 colonnes touchent a toute la 
zone memoire d'ecran, d'adresse $400 a $7F7, 
aussi bien en memoire principale qu'en memoi- 
re auxiliaire. Mais ces zones contiennent aussi 
les ♦omeux "trous d'ecran series de huit octets 
places entre cheque groupe de trois lignes et 
bien sur non affiches, mais tres utilises 

• En page principale, ces octets sont utili- 
ses comme registres temporaires par les 
programmes des "slots" (ports series, 
gestionnaires de disque, souris), aussi 
bien par I'Apple He que le Ik. 

* En memoire auxiliaire, I'Apple He utilise ces octets pour stocker la configuration par defaut des ports series 
(tondis que la configuration est imposee par des interrupteurs mecaniques sur la carte serie de I'Apple lie). 

Done, quand on charge un ecran 80 colonnes sur un Apple He, ces trous d'ecrans sont rem pi aces par ceux qui exis- 
taient dans la machine d'ou provient I' image : ca peut etre n'importe quoi ! C'est pourquoi d I'uti lisotion suivante 
de I' imprimante, rien ne va plus... 



ECRANS 80 COLONNES 

• Suite a voire article "crier des ecrons sur 80 colonnes", 
poru dons le numero 3 de T.M. et ayant utilise rieemment 
dons un bgiciel des ecrons cries grdce a voire utilitaire, nous 
avons constate un petit probleme concernant la sortie sur tma- 
gewriter (I ou II) d portir d'un Apple He. Ahrs que tout fonctionne 
ovant le chargement d'un ecran 80 colonnes, notre imprimante 
refuse d'imprimer quoi que ce soit apres ledit chargement. Vous 
pouvei d'ailleurs essayer de charger un ecran a partir de votre 
utilitaire, puis interrampre ce dernier et hire I'habituef PR£1. Le 
risultat est surprenont Nous mom d'oiHeurs eu le mime pro- 
bleme sur deux Apple He diflerents ; cela ne provient done pos 
d'une defaillonce ou des connexions. Notez que cet ennui ne se 
pose pas avec un He (equipe d'un 6502). Cela proviendrait-il de la 
gesfion mem.principQle/mem.auxiliaire du 65C02, vu que I'ecron 
colonnes se decompose en deux parties ? j*».f « m *t tkm&t z 



Les remedes : 

Avant d'utiliser Umprimante : 

• Le plus elegant (et le plus logique) : ne 
sauver et ne charger que les lignes 
d'ecran, et non pas toute la zone 
memoire concernee : cela necessite un 
programme qui deplace ces lignes vers 
une zone tampon puis sauve cette zone 
tampon ; et reciproquement au charge- 
ment : c'est ce que realise la routine 
MOVER80 d'Yvan KOENIG (voir plus loin). 

• Le plus immediat : apres I'ouverture du 
port ("PR£1" en BASIC), reconfigurer les 
ports par les commandes CTRL-I... (voir 
plus loin) : ca marche, mais ce nest pas 
tres pratique ! 

• Efficace aussi : utiliser le programme 



CONFIG modilie (BRUN CONFIG2,A$8O0Q) qui replace 
les valeurs en memoirs auxiliaire (il tout le faire apres 
le chargement de I'ecron 80 colonnes, bien sur). C.F. 
T.M. n°9 pages 53-54. II faut cependant le modifier 
legerement pour qu'il n'offiche rien en plus sur I'ecran ; 
ii suffit de mettre $60 (RTS) en $8065 pour annuler la 
partie message : soit "RLOAD CONFIG, A$8000", puis 
POKE 32869,96, puis sauver apres modification par 
"BSAVE CONFIG2, A$8000 r L$FF". 

Mais pourquoi ces voyages ? 

Pour I'Apple //c, les caracteristiques des ports sont 
memorises en plusieurs endroits, ce qui necessite 
des eclaircissements : 
A la mise sous tension : 

Des caracteristiques predefinies (ce que j'appelle confi- 
guration par defaut) sont receptees de la ROM vers les 
trous d'ecran de la memoire auxiliaire (ce qu'on peut 
faire par CALL 64734), (suite page 58) 



—————— 

T RE MP I IN MICRO 
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En utilisant les utilitoires systeme (ou le pro- 
gramme CONFIG) : 

Les caracteristiques des trous d'ecron en memoi- 
re auxiliaire sont remises d jour. 

En faisant Pomme ouverte-Control-Reset : 

Les trous d'ecron en memoire auxiliaire ne sont 
pas affectes (ce qui permet d'utiliser un pro- 
gramme d'application, ou de redemarrer sous 
DOS 3,3 ou Pascal avec les porls dejci regies). 

En ouvront un port par "PR£1" ou "PR£2" ou 
"\M\" ou "IN£2" : 

Les caracteristiques contenues dans Jes trous 



d'ecran en memoire auxiliaire sont recopies 
dans les trous d'ecran en memoire principale. 
En utilisant les commandes Control ! etc... decri- 
tes ci-dessous : 

Les caracteristiques contenues dans les trous 
d'ecran en memoire principale sont modifiees. 
Pendant le lonctionnement du port : 

Ce sont les caracteristiques contenues dans les trous 
d'ecran en memoire principale qui sont uti lisees. 

Oul ! c'est long a lire, mais ce n'est pas si com- 
plique qu'il n'y paraTt, et bien utile pour com- 
prendre les difficultes ! 



Commandes de configuration de port : (traduit du manuel de reference) 

Tout d'abord ouvrir le port : Controle-D (si le Dos ou ProDOS est en MEV), suivi de PR£1 
(pour le port 1) ou PR£2 (pour le port 2). Puis choque commande doit etre precede© de 
CTRL-I (ou la touche de tabulation) (pour le port 1) ou CTRL-A (pour le port 2) : Le curseur 
devient un point d'interrogation clignotanr. 



Liste des commandes : 



nntl Largeur de ligne : un retour chariot est 
genere automaliquement apres nnn 
caracteres. Cette commande doit etre suivie de 
N ou d'un retour chariot. 

nnB Met 1° vitesse en Baud correspondent 
a nn : 



nn 


Baud 


nn 


1 

Baud 


nn 


Baud 


i 


50 


6 


300 


1 1 


3600 


2 


75 


7 


600 


12 


4800 


3 


no 


8 


1200 


13 


7200 


4 


135 


9 


1800 


14 


9600 


5 


150 


10 


2400 


15 


19200 



Formate les donnees suivant la valeur 
de n : 



n 


Bits de 


Bits de 


n 


Bits de 


Bits de 




donnees 


stops 




donnees 


stops 





8 


1 


4 


8 


2 


i 


7 


1 


5 


7 


2 


2 


6 


1 


6 


6 


2 


3 


5 


1 


7 


5 


2 



Echo ; les caracteres envoyes sont repetes 
a I'ecran. 

K Pas de saut de ligne "Line Feed" automati- 
que apres un retour chariot. 

Genere automatiquement un saut de ligne 
apres un retour chariot. 



tintlN Change la largeur de ligne (de 1 a 
255) ; enleve I'echo eventuel. N.B. : 
ON ne supprime pas la generation automati- 
que du retour chariot ; il suffit, pour cela, soit 
d'utiliser les utifitaires-systeme, soit de met- 
tre en memoire $579. 

Bit de parite suivant la valeur de n : 

0, 2, 4 ou 6 : Pas de parite. 

1 : Parite impaire Odd' . 

3 : Parite poire "Even". 

5 : Bit "mark" (1). 

7 : Bit "space" (0). 

Reinitialise le port 1 (6 partir des valeurs 
par defaut des trous d 'ecrans en memoire 
auxiliaire) et le ferme. 

S Envoie un BREAK de 233 ms. 

Les caracteres de control© qui suivent 
seront ignores ; la sortie non formatee ; 
pas de generation automatique des retours cha- 
riot. II faut fermer puis reouvrir le port pour sor- 
tir de cette commande. 

CTRL-W (W ou n'importe quelle lettre) pour 
remplacer le caroctere de com 
mande (Control-! ou Control-A) en le faisant 
immediotement suivre par le nouveau caractere 
de controle desire. 

Et voila quelques mysteres du lie devoiles : on 
regrette seulement que la documentation four- 
nie avec lappareil n'en parle pas. II reste encore 
le fonctionnement des ports en entree "INC.", 
mais ce c'est pour une autre fois ! 
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OUY-HACHETTE 



Et voici les routines d'Yvan KOEN1G : 



DOSM0VER.80 et PR0M0VER.80 



Le probleme signale par Jean-Luc M. (page 
45 du n°9) au sujet des ecrans 80 colonnes 
et du lie est tres classique. APPLE en fait 
etat dans plusieurs documents. 
Un ecran 80 colonnes est en fait compose 
de deux ecrans 40 colonnes imbriques. Cha- 
cun de ces ecrans a la structure classique, a 
savoir 8 groupes de 3 * 40 = 120 octets 
consecutifs ce qui laisse 8 groupes de 8 
octets inutilises. .. par I'affichage. 
Ce gaspillage ne pouvant etre accepte, 
APPLE a tres rapidement trouve divers 
emplois a ces precieux octets. 
Sur les machines ouvertes, on y stocke des 
informations concernant les peripheriques. 
Si on charge directement un ecran cree 
dans un environnement different, on peut 
avoir des surprises ou, tout au moins, des 
bruits au niveau du lecteur. 
Sur le lie, to situation peut devenir plus 
grave. En effet, certains des octets en cause 
concernent la configuration memoire, ce 
qui risque de provoquer un plantage inte- 
gral (c.f. I'article de Luc MOREAU). 
C'esf pour cela que les auteurs de ProDOS ont 
pris soin de "proteger" I'ecran par le biois de 
la BITMAP. Le poke 48984,0 (48984 = $BF58) 
que mentionne Tremplin Micro dans les ver- 
sions ProDOS, supprime la protection BITMAP 
mais ne saurait pallier les inconvenients d'une 
perturbation des pointeurs. 



La seule solution correcte est de charger le 
fichier ecran en memoire "normale", puis 
d'effectuer un transfer!. C est ce que j'ai fait 
pour DHGR. EPSON et c'est ce que font les 
programmes DOSAA0VER80 et PROM0VER80 
pour les ecrans en mode texte. 
Avec xxxMOVER80, CALL 768 initialise un 
buffer de 4 pages sous les buffers du DOS 
sous DOS 3.3, entre les buffers et ProDOS 
sous ce systeme. 

CALL 771 copie le contenu de I'ecran PAGE2 
dans le buffer d'ou vous pouvez le sauver 
sur disque (ou sur /RAM), CALL 774 copie 
I'ecran PAG El dans le buffer d'ou vous 
pourrez aussi le sauver. ProDOS permet de 
n'utiliser qu'un fichier pour les deux moities 
d'ecran (c.f. les programmes TST.xxx). 

Pour retablir I'ecran, un BLOAD ramene 
I'ecran page 2 dans le buffer et CALL 782 le 
transfere dans I'ecran PAGE2. Ensuite, un 
BLOAD ramene I'ecran pagel dans le buffer 
et CALL 785 le redepose dans PAG El . 

Dans TST.PROM0VER.80 je fais appel 6 
PRO.FP qui, a l instar de la eommande FP du 
DOS 3.3, remet en place tous les pointeurs 
et, ce qui est nouveau remet les buffers 
dans leur position normale ce qui evite que 
des initialisations successives de routines 
comme PROM0VER.8O ne reduisent la 
memoire disponible a zero. 



TST.DOSM0VER.80 



10 


REM "TST.DOSM0VER.8Cf 




20 


TEXT : HOME : PRINT CHR$ (21 ) 


BQE9 


30 


PRINT CHR$ (4) "BLOAD DOSM0VER.80" : CALL 768 


293D 


35 


BUF = 256 * (4 4- PEEK (814)): D$ = CHR$ (4) 


720F 


40 


PRINT D$ PR£3" 


305E 


50 


FOR 1 = 1 TO 22 : HTAB 1: PRINT "REMPLISSAGE ECRAN" 


: NEXT 


60 


CALL 771 : PRINT D$" BSAVEECRAN2,L$3F8,A "BUF 


166E 


65 


CALL 774: PRINT D$ "B5AVEECRAN1 t L$3F8, A' BUF 


C970 


70 


HOME : FOR 1 = 1 TO 5 : PRINT CHR$ (7) : NEXT 


75B1 


75 


PRINT D$"BLOADECRAN2,A "BUF: CALL 782 


39U 


80 


PRINT D$"BLOADECRANl r A 'BUF: CALL 785 


81 16 


(Suite page 60}. 



TREMPLIN MICRO 
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DOSM0VER.80 



300 


4C 


41 


03 AO 


55 


2C 


AO 


310 


2C 


AO 


54 A2 


60 


A9 


28 


320 


2C 


55 


CO A2 


17 


8A 


20 


330 


61 


AO 


27 Bl 


60 


91 


28 


340 


60 


A5 


74 38 


E9 


04 


85 


350 


38 


E9 


04 8D 


2E 


03 


60 



BS AV£ DOSMQVER.ftG A768.L87 



54 A2 28 A9 60 DO 09 AO 55 A446 
8D 36 03 8E 34 03 8C 21 03 102E 
CI FB 85 60 A5 29 69 8E 85 2F8F 
88 10 F9 CA 10 E8 2C 54 CO F585 
51 A9 00 85 50 20 8E F2 EA F17C 

0643 



TST.PROM0VER.80 



10 


REM "TST.PROM0VER.80 




15 


D$ = CHR$ (4) : IF PEEK (1 16) — 150 THEN PRINT D$ '— PRO.FP" : 






GOTO 30 


COO 9 


20 


TEXT : HOME : PRINT CHR$ (21) 


B0E9 


30 


PRINT 0$"BLOAD PROM0 VER .80" : CALL 768 


F644 


35 


BUF = 256 * (4 + PEEK (814)) 


C431 


40 


PRINT D$"PR£3" 


3Q5E 


50 


FOR 1 s 1 TO 22 : HTAB I: PRINT "REMPLISSAGE ECRAN": NEXT 


BCC2 


60 


CALL 771 : PRINT D$" BSAVEECRAN , L$400 , A'BUF 


C51F 


65 


CALL 774: PRINT D$"BSAVEECRAN , L$3F8 , B$400 , A"BUF 


C565 


70 


HOME ; FOR 1 = 1 TO 5 : PRINT CHR$ (7) : NEXT 


75B1 


75 


PRINT D$*'BLOADECRAN,L$3F8 J A"BUF: CALL 782 


262F 


30 


PRINT D$"BLOADECRAN r L$3F8,B$400,A"BUF: CALL 785 


CA9E 



PROMOVERBO 



300 


4C 


41 


03 


AO 55 


2C 


AO 


54 


A2 


28 


A9 


60 


DO 


09 


AO 


55 


A446 


310 


2C 


A0 


54 


A2 60 


A9 


28 


8D 


36 


03 


8E 


34 


03 


8C 


21 


03 


102E 


320 


2C 


55 


CO 


A2 17 


SA 


20 


CI 


FB 


85 


60 


A5 


29 


69 


8E 


85 


2F8F 


330 


61 


AO 


27 


Bl 60 


91 


28 


88 


10 


F9 


CA 


10 


E8 


2C 


54 


CO 


F585 


340 


60 


A9 


04 


20 F5 


BE 


90 


08 


A9 OC 


20 


OC 


BE 


4C 


DO 


03 


6A36 


350 


38 


E9 


04 


8D 2E 


03 


60 




















0643 


BSAVE PROMflVER.80.A768 r L87 
























(cette routine est oussi utilise© par ailleurs 


voir 


fiche n°l 


l). 












300 


20 


F8 


BE 


A9 9E 


8D 


07 


BE 


A9 


BE 


8D 


08 


BE 


A9 


03 


8D 


CF62 


310 


F6 


03 


A9 


BE 8D 


F7 


03 


A9 


08 


85 


68 


A2 


01 


86 


67 


CA 


68DF 


320 


8E 


00 


08 


8A A2 


12 


9D 


58 


BF 


CA 


DO 


FA 


A9 


3F 


8D 


6B 


5BFC 


330 


BF 


A9 


CF 


8D 58 


BF 


A9 


F0 


8D 


10 


BE 


A9 


FD 8D 


1 1 


BE 


1 ID? 


340 


8D 


21 


BE 


A9 IB 


BD 


20 


BE 


A9 


00 


8D 


12 


BE 


8D 


16 


BE 


5802 


350 


8D 


22 


BE 


8D 26 


BE 


A9 


CI 


8D 


13 


BE 


8D 


23 


BE 


A9 


C3 


1980 


360 


8D 


17 


BE 


8D 27 


BE 


A9 


95 


20 


ED 


FD 


20 


84 


FE 


20 


2F 


8B0D 


370 


FB 


20 


58 


FC A9 


00 


8D 


F2 


03 


A9 


BE 


8D 


F3 


03 


49 


A5 


E172 


380 


80 


F4 


03 


A2 01 


8E 


9A 


03 


20 


91 


03 


E8 


EG 


05 


90 


F5 


5158 


390 


60 


78 


20 


00 BF 


41 


99 


03 


60 


01 


01 




BSAVE PRO.FP,A768,LI55 



CHASSE AUX BOGUES 

IW.TAB.HOR Vous avez eu beaucoup de 
chance si vous avez reussi a 
obtenir des tabulations avec les quelques lignes de 



programme parues page 58 de notre nume>o 10 ! 
Un atmable farceur avait mal recopi6 la ligne 40.,, 
et oublie de tester la routine oinsi modifiee. Bref , 
voici ce que devrait £tre cette fameuse ligne 40 : 

I 40 PRINT CHR$ (9)1:: NEXT 
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tremplin -M 
micro 1 1 



Bulletin de commande 
et d'abonnement 



Bulletin dretourner 6 . TRtMPLIN MICRO Senille 86100 CHATELLtRAULT 



Nom 

Adresse complete 
Code postal | j ] 



Prenom 



Vilie 



ifS DISQUE TTES FONCTIONNENT SOUS DOS ET ProDOS (a condition do ponM«r unm vortion Apple do co SYSTBMC DEXPLOITA.TION) 



QUANTITE 


DESIGNATION 


PRIX UNITAIRE 


TOTAL 




Abonnement 6 6 num^ros (un an) ; FRANCE 

tt pa rt 1 r du num tta r 


190 F 






Abonnement a 6 disquettes (un an) : FRANCE 

6 part lr du nwniro : 


feOO F 






AA1NIE, LOOICIEL DE CLAUDE AUBRY 


180 F 






DISQUETTE UTILITY-DISK (Marcel COTTINI) 


17QF 






LIVRE : LE 6502 PAS a PAS 


120 F 






LIVRE + DISQUETTE ; CLIN5 D CEIL AU 6502 


160 F 






RELIURE-ECRIN 


40 F 






DISQUETTE- INDEX (N°l a 6) 


30 F 






SIGNATURE (CHECK-LIST) (voir page 64) 


30 F 






DISQUETTE DE TREMPLIN MICRO :* ef n c ) 

N°l □ N°4 □ N°7! 1 N°10D 

n°2D n°5D N a en n°i i n 

N°3 I ! N°6 [ i N°90 


105 F 






NUMERO DE TREMPLIN MICRO :* 

N°l □ N°2CD N°3 N°4D N°5U N 60 


30 F 






NUMERO DE TREMPLIN MICRO ; * 

N°7 □ N°8 □ N°91 N°IOa Wild 


33 F 





" Cochmi to (ou Ion) ca*m(%) do voir* ehoin. 



Numero d'ahonne ou de client : 



Participation oux f rail denvoi (gratuit pour les abonnes) + TO F 
Envoi on paquet-poste recommando d parti r de 400 F 

— Total a payer 



Morel de libeller votro r*gl»n rnt a l ordre de TREMPLIN MICRO / Editions JIBENA 
Mod© de reglemsnt choisi : CI Cheque □ Mandat- lettre □ Carte Bleue 




N° de vet re Cart* Bleue 
Oat* d'*xplratlon | | | | | 
Montant a deb iter F 



Signature (obltgorolr*) 
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EDITIONS "TREMPLIN MICRO" 



LE 6502 
PAS a PAS 



par Bernard COURC 
et Y. HERBET 



Deux copains se rencontrent. Le 
premier se met en tete d'initier le 
second au langage machine de I'Apple. 

Le resultat : un bon petit bouquin 
qui vous prouvera a coup sur que t 
reellement, I'assembleur du 6502 
(etdu65C02)...c'est facile ! 



En souscription r 120 F 



CLINS D'OEIL 
AU 6502 



Vous trouverez dans ce recueil, 
outre des routines parues 
sous les signatures de Clement Renard, 
Nestor, Geo et Guy-Hachette, plusieurs 
programmes interessants, notamment 
en matiere de tri. 



Collectif Tremplin Micro 



En souscription : 160.P (avec to disquette) 



SIG NATURE (CHECK-LIST) 

Indispensable pour verifier la saisie des programmes de TREMPLIN MICRO 
(aussi bien en BASIC qu'en LANGAGE MACHINE). 

DISPONIBLE IMMEDI ATEMENT (DOS 3.3 et ProDOS) : 30 F - 



GUY-HACHETTE 



Extra! t du sommaire de la revue Pom's 27 

• un programme d'enregistrement, de restitution et d' impression des 
dcrans Minitel, pour dinrinuer les temps de connexion ; 

• une alarme telematique qui alerte les correspondents par des {crans 
Minitel, correspond ants qui peuvent '1616-dedencher' une riposte ; 

• un p/otocle de communication sous CP/M ; 

• la realisation d'un crayon optique et son programme de controle ; 

• un programme d'apprentissage du Forth ; 
• 

Diversite ? 

Pom's, c*est : Basic, Pascal, Assembleur 6502, 65CQ2. Z80, 
68000, Turbo-Pascal, des feuifles de calcul pour tableurs, aes as- 
tuces, des utilitaires de baut niveau utilisables par tous. , . 
— Pom's, chez votre marchand de journaux — 



Bon de commande a retourner a ; 
Editions MEV - 64, rue des Chantiers 
78000 Versailles 



Je desire recevoir ; 

* Revue Pom's 27 .... 

• Disquette Pom's 27..., 
(Parutlon 28 novembre) 

Norn, adresse : 



45 5 00F 
60,00 F 

Total ! 





Chaque mois, 
le meilleur 
de la 

technique 
et de la 
pratique 
photo ! 



> Chez votrt 

r marchand de journaux ! 



